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PART I : PROGRAMMER'S GUIDE 



Introduction 

The principal achievement of an assembly program is that it almost completely 
relieves the programmer of the problem of assigning actual storage locations 
to instructions or quantities manipulated by the program. If, in the course of 
programming, he wishes to refer to any location in storage which will contain 
some quantity used by the program, he gives this location a "name", preferably 
one of high mnemonic value, and refers to it by means of this name . Thus, 
salary might be stored in "WAGES", sin x in "SIN X". The assembly program 
assigns actual locations to these "names" and produces an absolute machine 
language program . 

SOAP II is a symbolic assembly program for the IBM 650 Data Processing System. 
It is designed to assemble programs written for any array of equipment including 
tapes, printer, immediate access storage, indexing registers, floatingpoint, 
disk storage and inquiry stations . The assembly program itself uses none of 
these features . It will operate on a basic 650 having an alphabetic device . Special 
features described in the sequel should render it equally useful for both 
scientific and commercial applications . 

Definition of Terms 

L = location 

D = data (address) 

I = instruction (address) 

Tag s character used to specify an indexing register 

FWA = first word address 

LWA = last word address 

OP = operation (code) 

Block = a consecutive group of drum (or core) locations 

Region = a block designated by an alphabetic character 

Pseudo- instruction = an instruction which is never executed 

Symbolizer part = left- most position of L, OP, D or I field 

Absolute part = L, OP, D or I field with symbolizer part deleted 

Available = subject to selection as an optimum drum location whenever the 

assembly program is given freedom of choice 
Unavailable = not subject to the above selection 
Reserve = to make unavailable 
I. A. S. = Immediate Access (core) Storage 



SOAP II Coding Form and Input Card Format 

Figure 1 shows the coding form to be used when writing for SOAP II. Vertical 
dotted lines separate the symbolizer and absolute parts of the L, OP, D and I 
fields . Observe that the input card format is indicated at the top of the form. 
Punching in columns 1-40 and 73-80 is ignored except for column 2 which 
must not contain a Y(12) punch. 

Instructions and data enter the assembly one word per card. The output is in 
the form of one word per card load cards . 

Specifying Program Area on Drum 

Prior to assembly, the entire drum is available to the program. It is invariably 
necessary, however, to prevent the program from occupying certain drum 
locations, e.g., input- output blocks, tables, data areas, etc. There are three 
pseudo operations which can be used to restrict the assembled program to any 
predesignated parts of the drum: 

Block Reservation: BLR 

This card contains two absolute drum addresses FWA, LWA (FWA < LWA) 
punched in the absolute part of the D and I fields, respectively. All locations 
from FWA to LWA (inclusive) are made unavailable . 

For example, 
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will make drum locations (1500-1900) unavailable. 

Block Availability: BLA 

This card is exactly like a BLK card except that it makes all locations from 

FWA to LWA available . Note that it is generally redundant to put a BLA 

card at the beginning of an assembly since the entire drum is already available 

By way of illustration, 
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will make drum locations 1600-1730 available. 

Regional Specification : REG 

This card contains an alphabetic character, punched in the symbolizer part of 
the D field, to be associated with a block defined by the terminal drum addresses 
FWA, LWA. As in the case of a BLR card, all locations from FWA to LWA 
are made unavailable . If the programmer wishes to refer to locations within 
a region using "regional" addresses (see below), an REG card must precede 
the first use of such addresses. 

The REG card 
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defines the block 0027-0036 as region P and causes this block to be made 
unavailable . 



Types of Addresses 

Regional 

A regional address has the form 



A;NNNN| 

where "A" is any alphabetic character and NNNN is a four digit number. The 
regional address of the first word of region B, for example, is B0001 . The 
twelfth word of region R is R0012. 



Note: 



1. The regional address "A "0000 is permitted. It will result in the absolute 
address (FWA-1). 

2. Regional addresses whose absolute equivalents are larger than LWA are 
permitted. For example, if region R is the block 1951-1960, the regional 
address R0015 will assemble as 1965. 

3. The use of a regional address without a defining REG card will result in 
the assembled address being left blank. 



Symbolic 

Symbolic addresses have the form 



C 4 C 3 C 2 C l 



where the C's may be any characters acceptable to the alphabetic or special 



character devices subject to the following restrictions: 



1 . C5 must not be blank . 

2. An address meant to be symbolic must not have a regional form, i.e., 
an alphabetic character followed by four numerical characters . 



Typical symbolic addresses are 
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Symbolic addresses are assigned optimum drum equivalents when initially 
encountered and maintain this equivalence throughout the assembly unless 
redefined. It is possible to preassign a value to a symbol (see EQU, SYN, 
pages 13, 14.) 

Absolute 

Absolute addresses have the form 

JNNNN 
where NNNN is a valid four digit machine address . The symbolizer part of 
an absolute address must be blank. 



Drum locations corresponding to absolute addresses are not made unavailable 
during assembly. Thus, drum locations containing instructions or data 
specified by absolute addresses must be block reserved at the beginning of 
assembly. 

Blank 

Whenever the D or I address of an instruction refers to the location of the "next' 
instruction (or data) written on the coding form, this address and the location 
of the "next" instruction may be left blank provided this order is not altered 
when assembling. Blank addresses will be filled in optimally by the assembly 
program . 

The D and I address of an instruction may both be blank if they both refer to 
the location of the next instruction written. An address should not be left blank 
in an instruction card unless the above meaning is specifically intended. 

Operation Codes 

650 operation codes may be written in either three character symbolic or two 

digit numerical form, e. g., 



R 
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65 



Symbolic operation codes to be used with SOAP II are given in the Appendix. 

Any card containing an illegal symbolic op code will be considered an instruction 
and processed accordingly. The assembled op will be left blank. 

Numerical Data 

Numerical data are written using the absolute part of the OP, D and I fields, e.g., 
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The symbolizer parts of these fields must be blank. Leading or trailing zeros 
must be punched in the card . 

Alphabetic Data: ALF 

The pseudo-op card ALF permits the programmer to enter alphabetic information 
into the 650 on load cards, up to five characters per card. Any characters 
acceptable to the alphabetic or special character devices are permissible, and 
are written in the D field. During assembly, alphabetic data are converted to 
their numerical equivalents and the latter are punched as a ten digit number 
in exactly the same manner as numerical data. For example, 
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will cause the number [69, 62, 74, 75, 88j to be loaded into symbolic location 
EDPM. 



Similarly, 
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will load [oO,97,90,95,Oo] Into (core) location 9010. 

Note: The I address of an ALF card is not used by SOAP II. However, if it is 
blank, it will be filled in by the symbol "SOAP 2". This is merely an 
artifice employed to avoid erroneous error detection when listing output 
(See Appendix-407 Control Panel). 

Signs 

Any punch in column 42 signifies a negative instruction or negative data. For 
coding purposes, a (-) written in the sign column and punched as X (11) will 
suffice . A blank in column 42 is interpreted as positive . 

Comments Card: Type 1 

Every card processed by SOAP II may contain remarks not exceeding 10 
characters in length. When longer remarks are desired, a comments card, 
which may contain up to 30 characters, may be used. Comments cards have 
no effect on the assembly. They are merely reproduced in the output deck. 
The following figure shows the format for comments cards . Note that the 
type (1) is punched in column 41 . 
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Example .1 



Prepare a table of 



F(x) = Ax* + Bx + C 



for 



x s 1, 2, , 100 

assuming A, B, C integers and | F(x) | < 10 

WORD 1 — — \ WORD 2 
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Coding is given in Figure 2. The assembled program is shown in Figure 3 
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Example II 



Given a rate code and number of hours worked, search a rate table and calculate 
gross pay. 



Input : 



IDE NT. 
I- -5 



HOURS 

XX-X 

7- -<? 



-RATE 
CODE 

X 

6 

"IT 

WORD 1 WORD 2 WORD 3 

Word 1: 00000, xxxxx = Identification 
Word 2: 00, OOOx, 0000 = Rate Code 
Word 3: 00 00000 xx.x = Hours 

The rate code is a one digit number 0-9. The corresponding hourly rate (x.xx) 
is in the low three positions of locations 0000-0009. 



Output: 



WORD I WORD 2 WORD 3 WORD 4 

+ * * 4 



IDE/V7T 
l- -5 



KATE 
CODE 

X 

6 



HOURS 

xx»x 

7- -5 



QROSS 

xxx-xx 

/O- -/4 



Coding is shown in Figure 4. The assembled program is given in Figure 5. 
Indexing 

When the D or I address of an instruction is to be modified by an indexing 
register, the corresponding TAG column is used to indicate the appropriate 
indexing register. Permissible tags are A, B, C or 1, 2, 3. The assembly 
program will automatically add the proper multiple of 2, 000 or 200 to a tagged 
address . 

For example, the following program will perform the vector addition 
Xj+y.s z., i=l, 2, . . . , 100. The x i are stored in region X, y. in region Y 
and z . in region Z . 
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COL 


.. 41 


42 


43J44- -47 


48149, 50 

— i 


Sl]52- -5S;56 


57J58- -6IJ62 


63- -72 




T 
Y 


s 
i 

G 
N 


LOCATION 


OPERATION 
CODE 


DATA 
ADDRESS 


It 

6 


INSTRUCTION ! I 
ADDRESS g 


REMARKS 








i 
i 


R|5A 


roioo 




AiDD 












A':PD 


RIAL 


xloioi 


A 










i 
i 

i 


AlLO 


Yioioi 


A 














i 
i 

■ < 


5JTL 


Zoioi 


A 














i 
I 


AjXA 


,(0001 












I 
i 


N|ZA 


A|DD 




j < 


> 




















1 


r 







The following types of D or I addresses will not be indexed even if a tag is 
present: 

1 . Undefined symbolic 

2. Blank 

3. Not in the range 0000-1999 or 9000-9059. 

Predefining Symbols 

The following two pseudo operations may be used to preassign a value to a 
symbolic address: } 

Equivalence : EQU 

The symbol written in the D address is assigned the equivalent of the expression 
written in the I address. The I address may be absolute, regional or symbolic. 
If the I address is regional or symbolic, it must have been previously defined. 

The EQU card 



COL. 



41 



42 



43144- -47 



LOCATION 



48i49, 50 



OPERATION 
CODE 



E!QU 



51 52* 



-55;56 



DATA J I 
ADDRESS J q 



TlAPE I 



57 58- 



-6H62 

u— 



INSTRUCTION ! J 



ADDRESS 



8Q1Q 1 



63- 



REMARKS 



will cause the symbol TAPE 1 to be assigned the value 8010 whenever it sub- 
sequently appears during assembly. 

The EQU card 



COL. 



41 



42 



43! 44- -47 



LOCATION 



48i49, 50 



OPERATION 
CODE 



ElQU 



51 52* -55«56 



DATA 
ADDRESS 



IT 

! A 
6 



CODE 



57158- 



-6H62 

I,. i 



INSTRUCTION ! J 



ADDRESS ! G 



Woooz 



63- 



REMARKS 



will cause the symbol CODE to be assigned the value R0002, i . e . , the second 
word of region R. Region R must have been previously defined by an REG card. 

Similarly, the EQU card 



will assign to ALPHA the value previously assigned to BETA, 



-72 



-72 



COL. 


41 


42 


43! 44. -47 


48J49, 50 


51 52* -55;56 


57)58- -6H62 


63- "72 




T 
V 

P 
E 


s 
1 

6 
N 


LOCATION 


OPERATION 
CODE 


1 T 

DATA J A 

ADDRESS j q 


INSTRUCTION 
ADDRESS 


T 
A 
G 


REMARKS 








1 
1 

1 


EJQU 


AiLPHA 




BiETA 




... . _ 
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Synonym: SYN 

An SYN card is exactly like an EQU card except that the equivalent of the 
expression written in the I address must be a drum address, i.e. , 0000< 
"I" £ 1999. This drum location is made unavailable to the program. The I 
address may be absolute, regional or symbolic. 

The SYN card 



|C0L. 



41 



42 



43(44- -4? 48i49, 50 



LOCATION 



OPERATION 
COOS 



S:YN 



51 52- 



-55"56 



DATA • J 
ADDRESS < g 



EiNTRY 



5758- 



-61 



INSTRUCTION 
ADDRESS 



62 



WZQ5 



63- 



-72 



REMARKS 



will assign the value 1205 to the symbol ENTRY and reserve location 1205. 

If the I address of an EQU or SYN card is undefined, the card will be ignored. 
EQU or SYN takes precedence over any previous definition. 

Assembly Capacity and Speed 

During assembly, all symbolic addresses and their equivalents are stored in a 
symbol table which can accommodate 400 symbols . Programs containing more 
than 400 symbolic addresses should be assembled in separate blocks. Non- 
overlap can be guaranteed by use of an availability punchout described in the 
next section. 

Assembly progresses at the rate of 50 to 90 cards per minute . This will decrease 
■ somewhat if the symbol table becomes densely packed or if few drum locations 
are available for the remaining program . 

Punching Availability Table: PAT 

The availability table is a 200 word table used by SOAP II to "remember" those 
drum locations already used and those still remaining. The pseudo-op PAT can 
be used at any time during assembly to cause punching of this table in a highly 
readable form. The output will be fifty Type Y (12) cards, one for each 
dynamic drum level (00-49). These cards may be listed with the 407 control 
panel described in the Appendix. This listing will reveal at a glance all drum 
locations used by the program (0) and those remaining (1) for additions or 
corrections . * 

The availability table may be loaded as input to an assembly thus restoring the 
*See page 91. 
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availability status which existed at some point of a prior assembly. 
Order of Assembly Deck 

The assembly input deck should have the following order: 

1. SOAP II 

2. Deck to be assembled 

Due to the one pass nature of the assembly, priority for the choice of optimal 
locations diminishes as the assembly progresses. Thus, frequently executed 
portions of the program should be placed toward the beginning of the assembly 
deck. 

Multifile Assembly: BOP 

Any number of independent programs may be assembled in one pass . Merely 
place a pseudo-op card BOP (Beginning of Program) between each program, i. e 



"bof 
;&6P 



\ Vrog,, 3 



1 ?ROGr. Z 



} 

} 



so^fjt 



Note that it is redundant to place a BOP card before the first of one or more 
programs to be assembled. 

Machine Operator's Guide 

1 . 533 Read-Punch Unit 

a . Insert SOAP II control panel 

b. Ready read feed with assembly deck 

c . Ready punch feed with blanks 

2. 650 Console 

a. Set programmed switch to STOP 

b. Set half cycle switch to RUN 
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c . Set control switch to RUN 

d. Set display switch to DISTRIBUTOR 

e . Set overflow switch to SENSE 

f . Set error switch to STOP 

3A. If SOAP II is being loaded, set (70, 1951, 9999) in storage entry switches . 

3B. If SOAP II is already on the drum, do one of the following 

1 . Set (00, 0000, 1000) in storage SnTry switches 

2. Precede input with a BOP card and set (00, 0000, 1950) in storage 
entry switches . outage 

4. Press computer -reset key 

5. Press program -start key 

6. When read hopper empties, press end of file key 

7. ^availability table may be obtained manually by sending control to location 

Programmed Stops 

0111 1v^oH^h &U: Pr , eS f ng pro ^ am - sta » ^y will continue assembly. 
Symbolic address which cannot be assigned an equivalent will be left 
blank in the output . 

0222-Drum packed, i.e., no locations available for remaining program 

Pressing program-start key will continue assembly. Addressfs which 
camiot be assigned will be left blank in the output . 

There are no other programmed stops . 
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APPENDIX 



Heading: HEP 

Heading is used to avoid duplicity of symbols when several programs or several 
sections of a single program are to be assembled together. The need for heading 
is paramount if several persons have contributed to a program or when a program 
employs symbolic library routines . 

Heading is accomplished in SOAP II by the automatic insertion of a heading 
character into the right-most position of symbols having this position blank. The 
heading character is punched in the symbolizer part of the D address of a HED 
card. Thus the symbol 



TiW 
i 



Ubb 



(b s blank) 



subsequent to the heading card 



COL. 


41 


42 


43! 44- -47 


48J49, 50 


5IJ52- -55J56 


57|58- -6li62 


63- 




-72 




T 
Y 

P 
E 


s 
i 

6 
N 


LOCATION 


OPERATION 
CODE 


DATA I I 
ADDRESS j q 


INSTRUCTION ! T 
ADDRESS \q 


REMARKS 








1 
1 

1 


H'| ED 


z! 




i 1 





is processed by the assembly program as if it were actually the symbol 
TJW 5 b z| 

In order to make effective use of heading, it is necessary to agree before hand 
to restrict all symbols to four characters or less.* Prior to assembly, each 
of the various sections of the program is preceded by an appropriate HED card 

If within a section of the program headed by "A" it is desired to refer to the 
symbol (TAX bb) appearing in a section headed by F, simply use the symbol 
(TAX bF). The small b, for blank column, is necessary to prevent the card 
punch operator from closing up the symbol and thus taking the "F" out of the 
heading column . 



♦If a symbol is to be referred to by several headed parts of the program, then 
it is best that this symbol not be headed anywhere . This can be accomplished 
by making it a five -character symbol. 
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The effect of a heading card is terminated only by another heading card If it la 
desired to terminate a heading card without introducing a new heading u^e a 

or^cT^WcSSe addreSS -K Any ^^ *"« » ^IphZic 
or special character devices may be used for heading. 

800X Instructions 

When the Dor I address of an instruction located in 800X (X * 1 2 3 S 6 

shou^h ° Pt i miZed h J ** aSS6mbly Pr0gTam ' « ^ruction lo'cat'ed in 800X 
should be written on the coding form. 800X instructions will be automatical^ 
bypassed when loading the assembled output . automatically 

Use of Library Programs 

r W el"e1Z W °^ h ° f !%* ^ **"** "^^ ^ ta either s ^°"c or 
section^ mS arS discussed * ^ following two 



Symbolic Library Programs 

Symbolic library programs are written in exactly the same form as the main 
program ^Except for the entry and exit symbols, all sym bols are fou^ ctaters 
or less. They may thus be conveniently headed. It is important tofof that 
such programs do not incorporate a -guaranteed" optimization 

Relocatable Library Programs- REL 

Prams' Tr" 11112 "^^ 1S T Ulred ' °" e Sh0UM USe -l°-table library 
f°S h J? h are C ° ded 1D ab80lUte v* ^ ** translated an amount 
specified by the programmer. This is accomplished by use of the Dseudn 
operatton REL (relocate). The number punched in the "absolute D address 
spect tes the amount of drum translation, A Q . Similarly, the absolute I 'address 
zero Tnuf ^^ °* ^ ttallSlatlon ' ^ c • A blank field is interpreted as 



[col. 



41 



42 



43i44- -47 



LOCATION 



48i49, 50 



OPERATION 
CODE 



RjEL. 



51 52- 



-55'56 



DATA 
ADDRESS 



1200 



57|58- -6H62 



INSTRUCTION i 
ADDRESS 



'T 



\OOIO 



63- 



-72 



REMARKS 



would cause drum addresses in the relocatable program following it to he 
incremented by 1200 and core addresses by 10. IhTreL carT 
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COL. 


41 


42 


43J44- _ 47 


48l49, 50 


5IJ52- -55;56 


57J58- -6IJ62 


63- -72 




T 
Y 
P 

E 


s 
i 

G 
N 


LOCATION 


OPERATION 
CODS 


DATA ! I 
ADDRESS j § 


INSTRUCTION i T 
ADDRESS jg 


REMARKS 








i 
i 


R;EL 


•0600 




i 
i 







will increment subsequent drum addresses by 600 and core addresses by 0. 
Only positive translations are permitted. 

Relocatable library programs must be assembled prior to the main program. The 
programmer need not block reserve the drum area used by a relocatable program 
This is automatically performed by the assembly program. 

The effect of an REL card is terminated only by another REL card . 

If a translated drum location is greater than 1999, it is left blank in the output. 
The same applies to a translated core location greater than 9059 . 

Writing Library Programs 

The following two sections are of primary interest to programmers responsible 
for writing SOAP II library routines . 

Symbolic Library Programs 

Entry and exit symbols should be five characters to avoid heading difficulties . 

All other symbols should be four characters or less to permit heading by the 

user. 

Relocatable Library Programs 

Relocatable programs are written in absolute and should use the lowest possible 
drum or core locations in the unrelocated state . The following rules apply 
specifically to these routines: 

1 . A relocatable card is indicated by a 2 punch in the type column (41) . 

2 . Op codes may be symbolic or numerical 

3 . L may be drum or core . 

4. D and I may be absolute or symbolic. * 



*Symbolic D or I addresses may occasionally be required to refer to other 
routines . 
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5. Absolute addresses may be one of five varieties: 



a. Non-relocatable (Fixed): |F \ NNNN| 

b. Drum relocatable:! i NNNN I ; 0000^ NNNN £ 1999 

c. Core relocatable: I i NNNN I ; 9000^ NNNN ^ 9059 

where NNNN is a four-digit number. In situations where D or I is relocatable 
but not in the range (b) or (c), the usage 



d. Drum relocatable: |D i NNNNj 

e. Core relocatable: |C ! NNNN) 

will eliminate possible ambiguity. 

6. Absolute D or I addresses in the range 0000-1999 or 9000-9059 after 
possible relocation may be tagged' for indexing by the assembly program, 

7. If L, after possible relocation, is a drum address, it will be made 
unavailable. D or I drum addresses are not reserved. 

Two pseudo operations, RBR and REQ are designed for use with relocatable 
programs . 

Relocatable Block Reservation : RBR 

The pseudo operation RBR is identical to BLR except that the drum addresses 
FWA, LWA are incremented by A „ prior to reservation . For example if 
A = 1000, D ' 

D 



COL. 



41 



42 



43i44~ -47 



LOCATION 



48i49 f 50 



OPERATION 
CODE 



RlBR 



5t 52* -55'56 



DATA 
ADDRESS 



IT 

! A 
6 



0025 



57i58- -6H62 



INSTRUCTION ! T 

Annocee I « 



ADDRESS | g 



0050 



63- 



REMARKS 



will cause drum locations (1025-1050) to be reserved. 

The use of RBR is mainly for drum routines which use erasable blocks within 
the routine. Reservation of these blocks is easily accomplished with RBR cards 
thus avoiding the necessity of a large number of cards simply to reserve 
erasable areas . 

Relocatable Equivalence : REQ 

The pseudo operation REQ enables symbolic linkage of the main program with 
relocatable programs. REQ is similar to EQU except that the absolute I address 
is incremented by A or A prior to being assigned as the equivalent of the 

c D 



-72 
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symbol in the D address. The I address must be absolute, type (b) or (c) 





(see 


5 above) . Thus if A = 0020, 










COL. 


41 


42 


43! 44- _47 


48;49, 50 


5IJ52- -55;56 


57|58- -61 1 62 


63- 




-72 




T 
Y 


3 
1 

6 
N 


LOCATION 


OPERATION 
CODE 


DATA j I 
ADDRESS j § 


INSTRUCTION 1 I 
ADDRESS \q 


REMARKS 








1 
1 
1 


RJEQ 


"RiAMACl 


i ?0/0| 





will assign 9030 as the equivalent of the symbol "RAMAC". 

Similarly, if A = 1300, 
D 



COL. 


41 


42 


43l44- -47 


48J49, 50 


5IJ52- -55J56 


57J58- -6li62 

1 1 


63- -72 




T 
Y 

P 

E 


s 
1 

G 
N 


LOCATION 


OPERATION 
OOOE 


DATA [I 
ADDRESS ; q 


INSTRUCTION 
ADDRESS 


T 
A 
6 


REMARKS 








1 
1 

1 


RlEQ 


TiYPE3 




\0O"75 







will assign 1375 as the equivalent of the symbol "TYPE 3. " 

To illustrate a typical drum-drum* relocatable subroutine, the program given 
in Figure 6, using indexing registers, will evaluate the polynomial 

F(x) = a x 11 + a , x 11 " 1 + a n 

v ' n n-1 

where n > and x, a. are floating point numbers . The a/s are stored such that 

U*$ = L(a Q ) + i 
The calling sequence is 



p 1 
COL. 


41 


42 


43i44- -47 

1 


48J49, 50 


5l]52- -55;56 


57J58- -6IJ62 


63- -72 




T 
Y 

I 


s 
1 

c 

N 


LOCATION 


OPERATION 
OODE 


DATA 
ADDRESS 


T 
A 
6 


INSTRUCTION 
ADDRESS 


T 
A 
6 


REMARKS 








1 


R|AL 


CiW 


















UDD 


Xi 
















• 

... 1 , 


RiAC 


NjEXT 




PlOLYX 







where 



CW = 



00, (L(a ) -f 2000 j , n 1 if the a. are on the drum 

00, |L(aQ) + 200 j , n] if the a^ are in core 



The routine will exit to (drum location) NEXT with the result in the upper 
accumulator . 

*Loaded onto and executed from the drum. 
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COL. 



41 



42 



43j44, -47|48i'49, 50 



LOCATION 



QQQ9 



OOI6 



OOI I 



OPERATION 
CODE 



snrp 



L.DD 



51/52- -55;56|57!58- ^61 



DATA 
ADDRESS 



i T 
! A 



00/3 



OOOI 



OOjO 



OOI 9 



0002 



SiDA 



T?!AA 



FiMP 



00/9 



oon 



F\80OZ 



OOI3 



INSTRUCTION 
ADDRESS 



62 



F'ADlF! 999 q 



0OO5 



OOI3 



NIZA 



5|XA 



01 



RlEQ 



0005 



FiOOO/ 



ROOOO 



P'OLYX 



00/6 



OO/J 



OOP/ 
OOIO 



63- 



-72 



REMARKS 



F 



SAVE X 



00/9 



OOOZ 



oooo 



SET AbPR. OF £< 



c ;-x 



oo/o 



oooo 

: L 0OO9 



i2i>L±A/->c ; 



IS K?= O 



rM-*n 



ERfiSE/IBUE (X) 



DEFINE ENTRY 



Figure 6: Relocatable Drum-Drum Subroutine 



col. 



The relocatable drum-core* subroutine given in Figure 7 will evaluate K 
where K > and K! < 10 10 . The calling sequence if K 



41 



42 



43(44- -47 



LOCATION 



48i49, 50 



OPERATION 
CODE 



Rial 



UDD 



51,52* -55 



DATA 
ADDRESS 



56 57J58- 



K 



E'XIT 



-61162 
ADDRESS ' 



INSTRUCTION i . 
A 



CALKF 



63- 



-72 



REMARKS 



Not Thf r m ^ l0Wer accumulator on exiting from the subroutine 

2fd^7 k " SGVen C ° re l0Catl ° nS ^ "**«*** execution, only 
six drum locations are needed to store the subroutine. Savings of this 

kind may usually be effected by placing erasable locations at the end of drum- 
core routines . -—- uxum 



*Loaded onto the drum and executed in core 
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COL. 



41 



42 



43! 44- 



■47 



LOCATION 



OOOO 



OOOI 



oooz 



0003 



0004 



48i49, 50 



OPERATION 
OOOH 



S:TD 



RIAA 



SiXA 



NlZA 



RIAU 



51 52- 



-55'56 



DATA 
ADDRESS 



iT 

I A 
6 



9006 



80 02 



OOOI 



9004 



F;8002 



57|58- 



-6H62 



INSTRUCTION 1 I 
ADDRESS a 



90OI 



900Z 



9003 



9006 



9005 



63- 



-72 



REMARKS 



STORE EXIT 



K->.ZA A 



(K-0 IN I. A. A 



IS (K-0=O 



( )-*UA 



0005 



MPY 



FI8005 



9002 



C )(K-p; 



RIEQ 



G1ALKF 



9000 



J>HF//VE ENT&Y 



Figure 7: Relocatable Drum- Core Subroutine 
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SYMBOLIC 650 OPERATION CODES 



Numerical 


Symbolic* 


Operation 


00 


NOP 


No Operation 


01 


HLT 


Halt 


02 


UFA 


Unnormalized Floating Add 


03 


RTC 


Read Tape Check 


04 


RTN 


Read Tape Numeric 


05 


RTA 


Read Tape Alphanumeric 


06 


WTN 


Write Tape Numeric 


07 


WTA 


Write Tape Alphanumeric 


08 


LIB 


Load I. A. S. Block 


09 


LDI 


Load I.A.S. 


10 


AUP 


Add Upper 


11 


SUP 


Subtract Upper 


12 


-_ 


(Not Used) 


13 


- 


(Not Used) 


14 


DIV 


Divide 


15 


ALO 


Add Lower 


16 


SLO 


Subtract Lower 


17 


AML 


Add Magnitude to Lower 


18 


SML 


Subtract Magnitude from Lower 


19 


MPY 


Multiply 


All O's in symbolic OP codes are alphabetic O's, 


not numerical zeros . 
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Numerical 


Symbolic 


20 


STL 


21 


STU 


22 


SDA 


23 


SIA 


24 


STD 


25 


NTS 


26 


BIN 


27 


SET 


28 


SIB 


29 


STI 


30 


SRT 


31 


SRD 


32 


FAD 


33 


FSB 


34 


FDV 


35 


SLT 


36 


SCT 


37 


FAM 


38 


FSM 


39 


FMP 



Operation 

Store Lower 

Store Upper 

Store Data Address 

Store Instruction Address 

Store Distributor 

Branch No Tape Signal 

Branch on Inquiry 

Set I.A.S. Ring 

Store I.A.S. Block 

Store I.A.S. 

Shift Right 

Shift and Round 

Floating Add 

Floating Subtract 

Floating Divide 

Shift Left 

Shift Left and Count 

Floating Add Magnitude 

Floating Subtract Magnitude 

Floating Multiply 
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Numerical 



Symbolic 



Operation 



40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 



NZA 

BMA 

NZB 

BMB 

NZU 

NZE 

BMI 

BOV 

NZC 

BMC 

AXA 

SXA 

AXB 

SXB 

NEF 

RWD 

WTM 

BST 

Aa(j 

sxc 



Branch Non-Zero I.R. A 
Branch Minus I . R . A 
Branch Non-Zero I.R. B 
Branch Minus I . R . B 
Branch Non-Zero Upper 
Branch Non-Zero 
Branch Minus 
Branch on Overflow 
Branch Non-Zero I.R. C 
Branch Minus I . R . C 
Add I.R. A 
Subtract I.R. A 
Add I.R. B 
Subtract I.R. B 
Branch No End of File 
Rewind 

Write Tape Mark 
Backspace Tape 
Add I.R. C 
Subtract I.R. C 
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Numerical 



Symbolic 



Operation 



60 
61 
62 
63 

64 

65 

66 

67 

68 

69 

70* 

71* 

72 

73 

74 

75 

76 

77 



RAU 
RSU 



DVR 

RAL 

RSL 

RAM 

RSM 

LDD 

RD1 

WR1 

RC1 

RD2 

WR2 

RG2 

RD3 

WR3 



78 RC3 

79 RPY 

*SOAP II will also accept the symbolic op codes 

70 RCD Read Card 

71 PCH Punch 



Reset Add Upper 

Reset Subtract Upper 

(Not Used) 

(Not Used) 

Divide Reset Upper 

Reset Add Lower 

Reset Subtract Lower 

Reset Add Magnitude into Lower 

Reset Subtract Magnitude into Lower 

Load Distributor 

Read Input Storage 1 

Write Output Storage 1 

Read Conditional Input Storage 1 

Read Input Storage 2 

Write Output Storage 2 

Read Conditional Input Storage 2 

Read Input Storage 3 

Write Output Storage 3 

Read Conditional Input Storage 3 

Reply 
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Numerical 



Symbolic 



Operation 



80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 



RAA 

RSA 

RAB 

RSB 

TLU 

SDS 

RDS 

WDS 

RAC 

RSC 

BDO 

BD1 

BD2 

BD3 

BD4 

BD5 

BD6 

BD7 

BD8 ~ 

BD9 



Reset Add I. R. A 
Reset Subtract I . R . A 
Reset Add I. R. B 
Reset Subtract I . R . B 
Table Lookup 
Seek Disk Storage 
Read Disk Storage 
Write Disk Storage 
Reset Add I . R . C 
Reset Subtract I . R . C 
Branch on 8 in Distributor 10 
Branch on 8 in Distributor 1 



Branch on 8 in Distributor 9 
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COL. 


41 


42 


43l44- -47 

i 


48i49 f 50 


5! [52- -55J56 


57158- -61162 


63- -72 




T 
V 

E 


s 
i 

G 
N 


LOCATION 


OPERATION 
CODE 


DATA 
ADDRESS 


T 
A 
6 


INSTRUCTION 
ADDRESS 


T 
A 
6 


REMARKS 












BiLT? 


j FWA 




! LWA 
















d:la 


i FWA 




j LWA 
















R!E<5 


*! FWA 




! LWA 




# = ALPHABETIC CHAR 












E!QU 


SYMBL 




\ ANY 
















SjYN 


SjYMBL 




I ANY 
















A LF 


X|XX X X 




• • 


- 














BIOP 


1 

1 




















HJED 


# ! 








# «r HEAVING CHAR. 












P! AT 


1 
1 

I 




















RjEL 


! Ad 




i Ac 
















K|B"R 


! FWA 




| LWA 
















RIEQ 


s;ymbl 




| NNNN 







Summary of Pseudo Operations 
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<0 



k^ut ft 



o 

UJ 

ft< 



hCyT 



ft 



ft. 



ft. 

o 



2 

o 

p 

3 * 



U) — t5Z 



h>"fi-UJ 






X 



O 
O 

o 
QO 

o^ 
o 
o 
o 

cT 
o 



cr K) 



J3j 



V3 



GS 



ft 






CO 

§ 

d 

Q 



>-X 

MM 

I! 



5* 






ft. 

ID 



K 



x 
x 
x 

X s 

X 
X 
X 

X 
X 



s 

X 

CM 






x 

X 
K 
X 



«) 



N 



ro 2 



o 

d 

a 



X! 
o 
o 

00 



ft 

Z> 

a 
o 

Qi 

a 

LU 

Qi 



h 



>-X 



ft? 

CO > 



X 

X 
X 
X 

X"* 
X 
X 
X 

x^ 

X 



o 
o 
o 

00 
X 

o 
o 

OQ 






o 
o 
o 

00 
»0 

cr 






R 






«) 



o 



CM 



VII 

S3 

VII 

o 
o 

a> 

I 

•9 

1 — I 

73 

>; 

<3 



>- 



o 
II 
X 



X 
X 
X 
X 

* 

X 

X 
X 
X 

X 

"X 

"V 

o 
«o 

+ 
o 

X 
X 
X 
X 
X 
X 
X 
X 
X 
X 

IT 

If 
©-^ 

o 

-+• 

a 
c^ 

o 

X 
X 
X 
X 
X 
X 
X 
X 
X 
X 

I - 

-«- 

n 
<^ 

o 

«0 

■+ 

n 

X 
X 
X 
X 
X 

X 
X 
X 
X 
X 

~o 



"51 

CD 



R 



"o" 

*0 



jo 
o 

»0 






N 



o 



C/2 



< 






ft 
o 

2 

c 

p 



u 

CO 

ft 
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407 Control Panel 

The 407 control panel shown in Figure 9 will detect the following situations in 
the assembled output: 

Note # 

1 - Instruction * with blank L following an instruction with D and I both not 

blank. 

2 - Instruction with L not blank following an instruction with either D or I 

blank. 

3 - Instruction with blank L not preceded by an instruction. 

4 - Non- instruction following an instruction with D or I blank. 

Notes (1) and (2) always imply a coding error while (3) and (4) are warning 
signals to point out potential coding errors . 

If the assembled L, OP, D or I fields of an instruction have been left blank, 
columns 75-78, respectively, will be x (11) punched. Correspondingly, the 
phrase 

BLANK L, OP, D or I 
will print to the right of the absolute instruction. 

If an EQU or SYN card has been ignored due to an undefined I address or a 
packed symbol table, column 79 will contain a 9 punch causing the word 
"BYPAS" to print to the right of the Remarks field. 



*Instruction -*• instruction or data, 
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PART II : PROGRAM ANALYSIS 

Introduction 

The following is a description of the internal operation of SOAP II. An attempt 
has been made to present this description in a logical order beginning with 
allocation of memory followed by an explanation of the tables governing the 
assembly and outline of the various subroutines . 

Jt h rrf°n C aSSembly ° f SOAP ° lDCluded at the end 0f ms re P°« was arrived 
at in the following manner: 

1 . SOAP II was coded symbolically for assembly by SOAP I 

2 Deck (1) was assembled by SOAP I, giving SOAP II in SOAP I form 

3. Deck (1) was translated into SOAP II symbolic form using the SOAP I 
to SOAP II Translator (N. Y . S . C . C . #334) . 

4. The symbolic SOAP II form of SOAP II (3) was assembled by Deck (2) 
giving SOAP II in SOAP II form. Y {) 

Is h s^°ifd am ^ USted * l0glCal ° rder ^ ° PP ° Sed t0 the ° rder ta which * was 
Memory Allocation 

Figure 1 is a "snapshot" of the drum showing the location of the various tables 
used by the assembly program and the Input-output and program blocks 

Table Descriptions 

Symbol Table: 0000-0399 

tfvery symbol processed by the assembly program is stored m the symbol 

fo^ows att6mPt ^ flrSt made t0 St ° re a Symb01 ln l0Cati ° n L com P^ed as 

Let : s = XXXXXXXXXX be the ten digit numerical representation of a five 
alpnanumerical character symbol . Calculate 

(1001001001) X (S) = YYYYYYYYYY(ZZZ)YYYYYYY 

Then L q is taken to be the integral part of .4(ZZZ). Thus 000 £ L < 399. 
It may be seen that jU of the digits in S contribute to the formation of L 
Thus different symbols will tend to give rise to different L 's, but the problem 
of duplicity, i.e., different symbols having the _sameL , must be accounted 
for. If a symbol cannot be stored in L Q (because another symbol has "gotten 
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there first"), an attempt is made to store it in (L + 1). If this too fails, we 
try L +2, L Q + 3, . , L Q + K where K is (hopefully) small. 

Equivalence Table: 0400-0599 

Whenever a symbol is stored in the symbol table, its four digit equivalent is 

stored in the equivalence table in the following manner: 

Let L be the location in the symbol table containing the symbol . Let 

2 2 

Then the equivalent is stored in the data address or instruction address part of 
(0400 + Q) according as R = or 1 . 

Availability Table: 0600-0799 

The availability table "remembers" drum locations used by the program being 
assembled arid those still remaining. Each of the 200 words contains indicator 
digits (0 — unavailable, 1 — available) for ten dynamically equivalent drum 

locations. If these digits are numbered from left to right, P = 0, 1, 2, , 9, 

then the digit corresponding to a drum location L may be found as follows:" 

Let L = X X XX.. Let 2L = Y Y Y Y 

12 3 4 12 3 4 . 

Then 

A = 0600 + Y, + 2(Y Y ) 
1 3 4 7 

p s Y 
r *2 

where A is the availability table location whose P th digit corresponds to L. 



Example: L = 1238 

2L = 2476 
A = 0600 4- 2 + 2(76) = 0754 
P =4 

Conversely, given A and P, one may compute L as follows: 

Let A-0600 R 
— = ^ -\ 

4 4 

Then L = 500R + 50P + Q 
Example: A = 0754, P = 4 

0754 - 0600 _ 2 54 _ 2 
4 4 4 
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L = 500 x 2 + 50 x 4 + 38 = 1238 



Optimizing Table: 0800-0899 

Information required to optimize 650 instructions is stored in the optimizing 
table . Location (0800 + XX) contains the entry for numerical op code XX where 
00 < XX < 99. Thus the entry for RAL (65) is in 0865. 

As there is no one rule by which all 650 instructions may be optimized, operations 
having the same or similar optimizing rules have been grouped as shown in 
Figure 2 . The general optimizing rules for these groups are: 



999 
998 
898 
988 
888 



I = D + 8 where 8 = f(D) 

I = L + 8 where 8 9* f(D) 

I = L + 8 where 8 = f(D), non-shift 

I = L + 8 shift other than SRD 

I = L + 8 SRD 



Optimizing table entries have the following format: 




OABC 



= ODD 
E=EVEN 



where ABC is the group code given in Figure 2 . Thus the entry for RAL is 
(3305040999) . 
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GROUP 
CODE 



999 



998 



898 

988 
888 



OPERATIONS 



UFA, AUP, SUP, DIV, ALO, SLO, AML, SML, 
MPY, STL, STU, SDA, SIA, STD, FAD, FSB, 
FDV, FAM, FSM, FMP, RAU, RSU, DVR, RAL, 
RSL, RAM, RSM, LDD, LIB, LDI, SIB, STI, 
TLU, RD1, WR1, RC1, RD2, WR2, RC2, RD3, 
WR3, RC3, RCD, PCH, RPY 

NOP, HLT, RTC, RTN, RTA, WTN, WTA, 
NTS, BIN, SET, NZA, BMA, NZB, BMB, NZC, 
BMC, NZU, NZE, BME, BOV, NEF, RWD, 

WTM, BST, BDO, BD1 , BD9, SDS, 

RDS, WDS 

AXA, SXA, AXB, SXB, AXC, SXC, RAA, RSA, 
RAB, RSB, RAC, RSC 

SRT, SLT, SCT 

SRD 



Figure 2: 650 Operation Groups 

Pseudo Operation Entries: 1001-1012 

•The twelve pseudo operations have been (arbitrarily) numbered as follows: 



# 


Pseudo Operation 


1 


BOP 


2 


BLR 


3 


BLA 


4 


REG 


5 


EQU 


6 


SYN 


7 


ALF 


8 


PAT 


9 


HED 


10 


REL 


11 


REQ 


12 


RBR 
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The first instruction of a pseudo operation is in location (1000 + #). Thus the 
REL routine begins in 1010. 

Region Table; 1021-1049 

Origins of the twenty-six possible regions are stored in the region table. The 
instruction address part of location (0960 + XX) contains the first word 
address (FWA) of the region having XX as the numerical representation of its 
alphabetic desiguation. Thus the origin of region F is in 1026 ( = 0960 + 66). 

The region table is initialized to (8000000000). Processing of an REG card with 
FWA - YYYY converts the appropriate entry to (900000YYYY) . 

Symbolic Op Table: 1050-1164 except 1098-1099 and 1148-1149 
All pseudo operation codes and symbolic 650 operation codes are stored in the 
symbolic op table. The table is in ascending order on the six high digits of each 
entry representing the numerical representation of the alphanumerical op code. 

The table entry for RAL, for example, is (7961730065) while that for REL is 
(7965731010). Thus the I address part of pseudo operation entries is the 
location of the first instruction of the pseudo routine while the two low order 
digits of 650 symbolic op code entries are the corresponding numerical op . 

Type Entries: 1990-1992 

The first instruction for types "blank", 1 and 2 is in location 1990, 1991, 1992 

respectively . 
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1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1959 

1960 



^ 






1 o 


CAT 


ION- 


















i— \j 












<< 




DA 


TA 


ADD 


RES 


S — 








— > 


«* 


- IN 


STR 


UCT 


ION 


A 


DDR 


ESS- 




Jte 


4g 


— n p 


C 


ODE- 








TAG-* «~I TAG~> 








£» 


< — D 


-< 






R 


EMA 


RKS- 








>. 


< 






1 R 


EMA 


RKS- 








>> 














X 


X 


X 


X 














X 


X 


X 




X 














X 


X 


X 




X 


' 














T 


7 

/ 


V 

' 




TYPE ( IF BLANK ) — 
8 =S»NQN — BI AN'w "n/Dr 


k 


t 


i \ 


r _ 4 




8 ^NEGATIVE 

















► ALPHABETIC 



L 
D 



ABSOLUTE 
PART 



FIGURE 3: INPUT BLOCK : 1951 - 1960 
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1977 
1978 
1979 
1980 

1981 
1982 

1983 
1984 

1985 
1986 



IN 



STR 



ASS 



LO 



DATA 



UCT 



CAT 



ION 



OP 



R 



EMB 

E° 



COD 



E M 



E M 



ION 



DDR 



ESS 



DDR 



A R 



A R 



LED 



8 



0/0 

; — ' — r~ 



r 



CAT 



ION 



KS 



K S 



IN 



ESS 



-«— D "TAG— -* 



STR 



8 



I / 

"T 



NON-BLANK TYPE 



NEGATIVE 



1 



BYPASS 



UCT 



k— I 



TAG-* 



-\ 



ION 



V 



ALPHABETIC 



< C 



x — — * * 



PUNCH A 



S=W 



PUNCH B 



800X INSTRUCTION 



ARD 



8 



NO.- 



BLANK OUT L- 



u D 



J 



•i I 



I 



it op 



FIGURE 4 ; OUTPUT BLOCK : 1 977 - 1 986 
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LOAD SOAP XX 



LOAD- 
AVAILABILITY 
CARD 



PROCESS OP 



(«p 



PROCESS L, D, t 



INITIALIZE 



<EHZ 



EAD 




MOVE ALPHA 
INPUT TO OUTPUT 



STEP CARD NO. 



STORE CONTROL INFO. 



CHE) 



1 2 



( PSEUDO J 1 



PSEUDO ROUTINE 



PUNCH 



L = LOAD CARD 
NL= NO LOAD CARD 



PROCESS OP 



RELOCATE L, D, I 



figures: basic flow chart 
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PSEUDO-OPERATION FLOW CHARTS 



G°*) 



INITIALIZE 



T 



G±J 



RESERVE FWA - LWA 



v B V A ) 





SET DRUM TAG TO 8 






> 


r 




UNRESERVE FWA - LWA 



( s _ALF_J) 



PROCESS LOCATION 



READ W2 -*• PUNCH W7 



|S I BLANK 



SET I = SOAP 2 



( \ 

\ REG J 
* 



IS REGION 
CHAR. ALPHA 



STORE REGION ORIGIN 



RESERVE FWA - LWA 





(p AT ) 




\1 


PUNCH PAT CARD 




^ 






PUNCH 

AVAILABILITY 

TABLE 






> 


f 






READ 





C^°) 



STORE HEADING 
CHARACTER 



T 



G*D 



setA d , A c 



NOTE: EXCEPT FOR PAT, THESE ROUTINES TERMINATE AT PUNCH 
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(ED 



SET TAG = 8 



SET TAG = 8 




SET TAG =s 9 



i r~ 



WHAT IS I 



SET E SB ABS. ADR. 



test (1-2000) 




SET 
E = 1+ A D 




SET 
Ess 1+ A 



( RBR J 



RESERVE 
(FWA+A D ) - (LWA+A D ) 



T 




§ ® & 



A SB. ABSOLUTE 
R = REGIONAL. 
S = SYMBOLIC 



IS 
REGION 
DEFINED 



N 



CALCULATE 
REGIONAL 
ADDRESS 



1 



TEST 
SYMBOL 



rf (?) fe) 



*•* 



SET 
E = EQUIV. 



SET E = REG. ADR. 



*«" 



TEST SYMBOLIC D 





3: 



(™I) 



STORE DKE 



SET 
BYPAS 



TEST 
TAG 




RESERVE E 
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RELOCATABLE ROUTINE 



PROCESS OP 



— G±-y 



GD 



TEST L 



SET L = U+Ad 



IS L<2000 



is L<2000 



-<K> 



Y 



RESERVE L 



*r 



SET OUTPUT L 



BLANK OUT L 



<t) 



(SEE NEXT PAGE) 



BLANK OUT OP 



D DRUM 
F FIXED 
C CORE 



SET L= L+ £ic 



Ac 



is L <9060 



IsT 



L MAY BE 1) |F J NNNN j FIXED DRUM OR CORE 

2) I I NNNN I RELOCATABLE DRUM OR CORE 
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WHAT IS D 





is D<2000 




Y 






TEST D 



NJ ( Dj ( C 





SET 
D= D+ A D 



SET 
D= D+ A 



I 



PROCESS D 



WHAT IS I 





IS I <2000 




Y 




N 





TEST I 





SET 

I = 1+ Ad 



SET 



£. 



PROCESS I 



T 



(D 5 == SYMBOL.IZER 
PART OF D) 
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(PUNCH) 



Subroutines 

SOAP II contains twenty- one subroutines . The following is a description of each 
subroutine giving 

A. Functional description 

B. Entry conditions and entry point 

C . Exit conditions (where applicable) 

D. Flow chart (where applicable) 

1 . Store K in all locations from FWA to LWA 

Entry: UA (K) Go to SUBR1 

LA(00, FWA, LWA) 
DIST (exit) 

2. Reserve or unreserve N sequential- drum locations beginning at FWA. 

Entry: UA (00, 0000, FWA) Go tof SUB2R - Reserve 

LA (00, 0000, N-l) I SUB2U - Unreserve 

DIST (exit) 

3 . Process op code and exit to K or (K + 1) . 

Entry : DIST (00, 0000, K) Go to SUBR3 

Exit: K: 1 . Legal 650 op; numerical op stored in punch word 7 and 

optimizing table entry stored in "OPTIMV 
2. Illegal symbolic op; "OPTIM" set to (5505050999) and 
punch control word set to blank out assembled op. 

K + 1: Pseudo op (routine begins in 10XX) 
UA (00, 0000, 10XX) 
LA (irrelevant) 

4. Determine whether address is absolute, regional or symbolic and 
accordingly exit to K, (K + 1), or (K + 2) . 

Entry: UA (alpha, address) Go to SUBR4 

LA (clear) 
DIST (00, 0000, K) 

Exit: K: Absolute 

K + 1: Regional) UA (alpha, address) 

K + 2: Symbolic J LA (clear) 
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Note : If address is symbolic, it is automatically headed and stored in 
"HSYMB. " Upon exiting, the UA also contains the headed symbol . 

5. Test absolute address A and exit to K, (K + 1), (K + 2) or (K + 3). 

Entry: UA (irrelevant) Go to SUBR5 



LA (00, 0000, A) 




DIST (00, 0000, K) 




Exit: K: A < 2000 ^ 




K+ l: A = 800X 1 


UA (clear) 


K + 2: 9000 < A < 9059 [ 


LA (00, 0000, A) 


K + 3: Other J 





6. Test symbol and exit to K, K + 1, or K + 2. 

Entry : UA (symbol) Go to SUBR6 

LA (clear) 
DIST (00, 0000, K) 

Exit: K: In table "\ UA (symbol) 

Equivalent in I address ( LA (00, L*, 0000) 
part of "EQUIV" ( "LSYMB" (00, L*, 0000) 

K+l: Not in table J 

K+2 Not in table and symbol table packed. 

Note : L* = symbol table location containing symbol on exit K or location 
in symbol table where symbol may be stored on exit (K + 1) . 

7. Store symbol in symbol table L* location and equivalent E in equivalence table 

Entry : UA (symbol) Go to SUBR7 

LA (00, L*, E) " 

DIST (exit) 

8. Obtain equivalent E of symbol stored in symbol table location L*. 

Entry : UA (clear) Go to SUBR8 

LA (XX, L*, XXXX) 

DIST (exit) 

Exit: UA (clear) 

LA (00, L*, 0000) 
"EQUIV" (00, 0000, E) 
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9 . Calculate regional address A and exit to K or (K + 1) . 

Entry: UA (alpha, regional address) Go to SUBR9 

LA (clear) [90 - L 

DIST(00, OOojS , K); a/3M88 - D 

189 - I . ._ 

Exit: K: UA (clear) 

LA (00, 0000, A) 
K + 1 : Region undefined or A negative . 

10. Set "PUNCH A" 8 in punch control word and execute punch instruction. 

Entry : UA (exit) Go to SUB10 

LA (clear) 

11 . Calculate optimum dynamic address and find and reserve "best" drum 
location L; exit to Kor(K+ 1). 

Entry: UA (clear) Go to SUB11 

[90 - L 

LA (00, 00 a£ , K): a£ * j 88 - D 

1.89 - I 

Exit: K: UA (clear) 

LA (00, 0000, L) 
K+l: Drum packed 

12. Set 8 in punch control word to blank out assembled location. 

Entry : UA (exit) Go to SUB12 

LA (clear) 

13. Calculate optimum dynamic address XX. 



Entry: DIST (00, 0000 , K) 


Go to SUB13 




H 9 -I 


Exit: K: UA (clear) 

LA (00, 0000, 00XX) 


00 £ XX < 49 
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14. Punch availability table. 
Entry: DIST (exit) 

15. Head symbol. 

Entry: UA (symbol) 
LA (clear) 
DIST (exit) 

Exit: UA (headed symbol) 

LA (clear) 

16. Initialize assembly. 
Entry: DIST (exit) 

17. Calculate drum equivalent E of 800X 
Entry: UA (exit) 

Exit: UA (clear) 

LA (00, 0000, E) 

18. Index address A giving A*. 

Entry: UA (irrelevant) 
LA (00, 0000, A) 
DIST (00, 00 cc(3, K) 



oC = 



|8-Drum 
19 -Core 



Exit: 



UA (irrelevant) 
LA (00, 0000, A*) 



19. Process location. 
Entry: DIST (exit) 

20 . Process data address . 
Entry: DIST (exit) 

21 . Process Instruction address 
Entry: DIST (exit) 



(8-D 
'(9-1 



Go to SUB14 



Go to SUB15 



Go to SUB16 



Go t0 ( SB17D - D equivalent 



SB17I - I equivalent 



Go to INDEX 



Go to PROCL 



Go to PROCD 



Go to PROCI 
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SUBROUTINE FLOW CHARTS 





SET L = FWA 






V 




v 


K-*L 












\r 






IS L = LWA 






<¥ 






L + 1 — L 















EXIT 



SUBROUTINE 1 : STORE K IN FWA - LWA 



■(n) 



IS OP SYMBOLIC 



TLU SYMBOLIC OP TABLE 



IS OP LEGAL 



— — (n\ 



IS OP PSEUDO 



— <x>*CZE3 



SET OUTPUT NUMERIC OP 



GET OPTIMIZING TABLE ENTRY 







BLANK OUT 
ASSEMBLED OP 



SET ILLEGAL 

OP OPTIM IZING 

CONSTANTS 



SUBROUTINE 3 : PROCESS OP CODE 
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SUB2R 



SUB2U 



SET W=Q 



SET W = 1 



1 



SET N r N— 1 



CALC. Ao , Po FOR F\ 



SET Al=Ao, P = Po 



W— (AL, P) 



IS N = O 



N- 1 — * N 



is Al>Ai 



AL + 4 — Ai 



P=9 



P + l — P 



At-196— Al 



SET P= 



Al-195— • AL 



Y > 
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SUBROUTINE 2: RESERVE OR UNRESERVE N WORDS STARTING AT FWA 



IS C_ BLANK 



:-©— *® 



IS C4C3CJ.C, NUMERIC 



is 61 < c 5 < 89 



K»> 



^K+2 ) 



C k+i ) 



SUBROUTINE 4 : ADDRESS TEST 



TL.U RANGE TABLE GIVING Q 



K+Q 



Q 



RANGE 





1 

2 


0000< A < 1999 
r 8000 < A < 8003 
1 8005 < A < 8007 

9000 <A< 9059 


3 


OTHER 


SUBROUTINE 5 : 


ADDRESS RANGE TEST 
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IS L_. MAX. 



SET SW ON 



set Ll = 0000 



SET SW OFF 



SCRAMBLE SYMBOL GIVING L r 



> ET H = S 



ARE C(LJ) = 




r 



k+Tj 



NOTE*. SWSYM SET OFF 

DURING INITIALIZATION 



v M 



STEP L; 



GET EQUIVALENT 




# 0111 



STOP 



SET SWSYM ON 



(Z*D 



■© 



SUBROUTINE 6 : SYMBOL TEST 
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STORE SYMBOL. IN U. 



* 



CALC. L^ssQ+R 

T 7 



set L = 400 + Q 



TEST R 



<D 



E— D.A, PART OF L. 



E— »X.A. PART OF U. 



EXIT 



SUBROUTINE 71 STORE SYMBOL AND EQUIVALENT 



CALC. _L.^_ Q , R 

2 



-7T - +y 



set L = 400 + Q 



TEST R 



<L> 



SET E = D.A. PART OF L 



SET E= I.A. PART OF L. 



i 



EXIT 



SUBROUTINE 8: OBTAIN SYMBOLIC EQUIVALENT 
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set L = 960 + R 



(REG. ADR.= RNNNN) 



TEST C(L) 



cauc. A = ORG. + NNNN-! 



TEST A 



ME> 



(H 



+ 1 



3 



SUBROUTINE 9 : CALCULATE REGIONAL ADDRESS 



SUBROUTINE 10 : (SEE PROGRAM LISTING) 



SUBROUTINE 12 : (SEE PROGRAM LISTING) 
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TEST DRUM TAG 



<5X^D 



IS A' MAX. 



JET SW ON 



CALCULATE OPTIMUM 
DYNAMIC ADDRESS 



SET a- v = 0600 



calc. a = 600+ 4(D.A.) 



SET SW OFF 



SET A' — A 



->| IS C(A{) ~ 




sw 



\< v 



N 



IS A. = Ap 



STEP A- 



STOP 



"//' ' Cm Cm Cm 



SET DRUM 
TAG TO 9 



CEZD 



SCT GIVING P 



SET P DIGIT 
TO ZERO 



CALC l = F < A j/ p) 



® 



SUBROUTINE 1 1 : FIND AND RESERVE BEST DRUM LOCATION 
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i 



TEST £► 



<•> 



GET D 8 *S 



<D 



TEST B 



TEST A 



TL.U D ADDRESS 
TO GET g. 1 S 



CALC, ORrQ+R 

T~ T 



<°> 



TEST R 



tO 



GET EVEN 8 



GET ODD 



I 



CALC. L1QR+ 8 



SET D.A. = L MOD. 50 



EXIT 



TLU D, TO 
GET SHIFT g'S 



TEST A 



GET 

OTHER 

8'S 



GET 
SRD 
8*S 



A, B= OPTIMIZING 

INDICATOR DIGITS 

OR = OPTIMIZING REGISTER 
(OPREG) 



SUBROUTINE 13 : CALCULATE OPTIMUM DYNAMIC ADDRESS 
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SET PUNCH B 
CONTROL WORD 



SET A! = A, 



set RS =0000,0450 



> SET PI = P0001 



RS-P1 



is PI =P0007 



P1f2-*P1 



I 



RS+500-^RS 



€> 



PUNCH 



JS A! MAX. 



SET P2 = P0002 



C(Ap— P2 



is P2 = P0008 



P2+2-*P2 



A l +1 -" A t 



Y ) £» EXIT 



Al+1 _ Al 



RS-1499-*RS 



SUBROUTINE 14 1 PUNCH AVAILABILITY TABLE 
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IS Ci BLANK 




HH> 



HEAD 



EXIT 



SUBROUTINE 15 | HEADING 



SET CARD NO. TO ZERO 



SET HEADING CHAR. TO BLANK 



SET SYMBOL. TABLE AND EQUIVALENCE TABLE TO ZERO 



SET AVAILABILITY TABLE TO 1111111111 



SET DRUM TAG TO 8 



SET SWSYM OFF 



SET REGION TABLE TO 8000000000 



EXIT 



SUBROUTINE 16: INITIALIZATION 
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CALCULATE OPTIMUM DYNAMIC ADDRESS 



is X-3 



SET EsO.A. 



TEST D.A. 



{E = EVEN 
Q=ODD 



is X~2 



SET E = D. A.+ l 



SET E = D.A. 



EXIT 



SUBROUTINE 17 * CALCULATE 800X DRUM EQUIVALENT 







fi 


r 


\ 












/ 


^> 








1 


^ 


) 


• "-"" H 




\ 






> 








V 


GET D TAG 






GET I TAG 










i, 














> 


t 










calc.S = 2000T 


(T = UNITS D 








> 


f 










TEST Of 


IT) 


y 








A 




1 8 — S 






































SET A = A + 8 










> 


r 














EXIT 







SUBROUTINE 18 : INDEX ADDRESS 



61 



TEST 

DRUM 

TAG 



SET L=OR 



EXIT 
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WHAT IS L 



5T© 




lisL <2000 



is L=800X 



K2H 



ORX—OR 



SET 800X 

PUNCH CONTROL 



is 9000£L^9059 



ORC-*OR 



4»- L— *OR 



SET L 



EXIT 



IS REG. DEFINED 



CALC. REG. ADR. 




FIND AND RESERVE 
BEST l_ 



<Z> 



B = BLANK 

A = ABSOLUTE 

R s REGIONAL 

,S =s SYMBOLIC 



JF =s FOUN 
\P = PACK 



D 

ED 



STORE S»L 



J 



"^H BLANK OUT L 



SUBROUTINE 19: PROCESS LOCATION 



CALC. OPTIMUM D.A 



FIND AND RESERVE 
BEST D 




FIND AND RESERVE 
BEST D 



<5> 



STORE SftJD 



^. BLANK OUT D 



SUBROUTINE 20 : PROCESS DATA ADDRESS 
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€j 35 CZ^D 



SET I = EQ. 



CALCULATE 
OPTIMUM D.A. 



FIND AND RESERVE 
BEST I 



STORE S«I 



BLANK OUT I 
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SUBROUTINE 21 : PROCESS INSTRUCTION ADDRESS 



SOAP 2 
SYMBOLIC OPTIMAL ASSEMBLY PROG 
FOR THE 
IBM 650 
DATA PROCESSING SYSTEM 





REG 


SOOOO 


0399 


SYMBOL TAB 












REG 


E0400 


0599 


EQU IV TABL 












REG 


A0600 


0799 


AVAIL TABL 












REG 


N0800 


0899 


NUM OP TAB 












BLR 


1000 


1000 


ENTRY 












BLR 


1001 


1012 


PSEUDO ENT 












BLR 


1021 


1049 


REG TABLE 












REG 


C1050 


1164 


SYM OP TAB 












BLA 


1098 


1099 - 














BLA 


1148 


1149 














BLR 


1900 


1900 


MANUAL PAT 












SYN 


READC 


1950 














BLR 


1951 


1962 


READ AREA 












REG 


T1990 


1992 


TYPE 












REG 


P1977 


1986 - 


PUNCH AREA 












BLR 


1998 


1999 














EQU 


XXXX1 


1961 














EQU 


XXXX2 


1962 














BLR 


1563 


1570 


TYPE2 












BLA 


1565 


1565 














BLA 


1569 


1569 














REG 


B0900 


0901 


SUB 2 












REG 


H0902 


0904 


TYPE 2 












REG 


M0905 


* 0907 














REG 


Q0908 


0909 














REG 


R1200 


1207 


SUB 5 












REG 


U1250 


1259 


SUB 13 












REG 


V0910 


0912 


EQU SYN 












REG 


X0913 


0914 


TYPE 












REG 


Y0915 


0916 


EQU SYN 












REG 


Z0917 


0919 














REG 


W0920 


0922 














BLR 


0923 


0968 


MULTIPLE R 












REG 


11300 
CONTROL 


1307 
PROGRAM 


SUB 13 










1000 


LDD 


READC 


SUB16 


ENTRY 


1000 


69 


1950 


1353 


READC 


RCD 


1999 


1998 


READ CARD 


1950 


70 


1999 


1998 


1998 


LDD 


1951 




TRANSFER 


1998 


69 


1951 


1354 




STD 


P0001 




ALPHABETIC 


1354 


24 


1977 


0980 




LDD 


1952 




INPUT 


0980 


69 


1952 


1355 




STD 


P0002 




TO 


1355 


24 


1978 


0981 



65 





LDD 


1953 






STD 


P0003 






LDD 


1954 






STD 


P0004 






LDD 


1955 






STD 


P0005 






LDD 


1956 






STD 


P0006 






RAL 


P0009 






ALO 


11 XXX 






STL 


P0009 






RAU 


1960 






SRT 


0002 






STU 


P0008 






AUP 


TORG 






STL 


P0010 


8003 


8003 


NOP 


0000 


9999 


PUNCH 


PCH 


P0001 


READC 


SETCC 


RAU 


READC 


SUB10 



1900 



LDD READC 



SUB14 



OUTPUT 


0981 


69 


1953 


1356 




1356 


24 


1979 


0982 




0982 


69 


1954 


1357 




1357 


24 


1980 


0983 




0983 


69 


1955 


1208 




1208 


24 


1981 


0984 




0984 


69 


1956 


1209 




1209 


24 


1982 


0985 


STEP 


0985 


65 


1985 


0989 


CARD 


0989 


15 


0992 


0997 


NUMBER 


0997 


20 


1985 


0988 


STORE 


0988 


60 


1960 


1015 


CONTROL 


1015 


30 


0002 


0971 


INFO 


0971 


21 


1984 


0987 




0987 


10 


0990 


0995 


TRANSFER 


0995 


20 


1986 


8003 


TO TYPE 


8003 


00 


0000 


9999 


PUNCH REAP 


1350 


71 


1977 


1950 


SUDO EXIT 


1400 


60 


1950 


1405 


MANUAL PAT 


1900 


69 


1950 


1403 



T0001 


LDD 


X 


SUBR3 


TYPE 


1990 


69 


0993 


0996 


X0001 


LDD 




PROCL 


650 


0913 


69 


1016 


0969 




LDD 




PROCD 


COMMAND OR 


1016 


69 


1019 


0972 




LDD 


PUNCH 


PROCI 


CONSTANTS 


1019 


69 


1350 


1453 


X0002 


NOP 


0000 


8003 


PSEUDO OP 


0914 


00 


0000 


8003 


T0002 


RAU 


READC 


SUB10 


TYPE 1 COM' 


1991 


60 


1950 


1405 


X 


00 
HED 


0000 
RELOCATE 
T 


X0001 
ROUTINE 




0993 


00 


0000 


0913 


T0003 


LDD 


Q 


SUBR3 


PROCESS OP 


1992 


69 


1195 


0996 


Q0002 


NOP 


0000 


ILLOP 


ILLEGAL OP 


0909 


00 


0000 


1013 


Q0001 


RAL 


1951 




IS L FIXED 


0908 


65 


1951 


1455 




SLT 


0002 






1455 


35 


0002 


1211 




NZU 




REL 




1211 


44 


1165 


1166 




RAU 


1957 




FIXED L 


1165 


60 


1957 


1261 




SUP 


20001 




DRUM CORE 


1261 


11 


1014 


1169 




BMI 




FC 




1169 


46 


1172 


0973 




AUP 


8001 


RES 


FIXED DRUM 


1172 


10 


8001 


0979 


FC 


RAL 


1957 


SETL 


FIXED CORE 


0973 


65 


1957 


1311 


SR 


RAL 


XXXX1 


SETL 


SET L 


1450 


65 


1961 


1311 


SETL 


SLT 


0004 






1311 


35 


0004 


1171 




LDD 


P0008 


/ 




1171 


69 


1984 


1187 




SDA 


P0008 


PROD 




1187 


22 


1984 


1237 



66 



REL 


RAU 


1957 




DRUM CORE 


1166 


60 


1957 


1361 




SUP 


20001 






1361 


11 


1014 


1219 




BMI 




RC 




1219 


46 


JU Cm £t* £* 


1173 




AUP 


DDIFF 




RELOCATE 


JL £m Aa> fcw. 


10 


0975 


1179 




BMI 




BL 


DRUM ADDR 


1179 


46 


1182 


1183 




AUP 


20001 


RES 




1182 


10 


1014 


0979 


RES 


STU 


XXXX1 






0979 


21 


1961 


1214 




LDD 


SR 


SUB2R 


RESERVE L 


1214 


69 


1450 


1503 


RC 


RAL 


1957 




RELOCATE " 


1173 


65 


1957 


1411 




ALO 


CDIFF 




CORE 


1411 


15 


1264 


1269 




SLO 


9060 






1269 


16 


1272 


0977 




BMI 




BL 




0977 


46 


1180 


1183 




ALO 


8001 


SETL 




1180 


15 


8001 


1311 


BL 


RAU 

REG 
REG 


PROD 

J0944 
G0941 


SUB12 

0944 
0941 


BLANK L 
D TYPE 2 


1183 


60 




0991 


PROD 


LDD 


PROI 




SET D EXIT 


1237 


69 


1190 


1193 




STD 


EXITX 






1193 


24 


1196. 


0999 




RAU 


1952 




WHAT IS D 


0999 


60 


1952 


1407 




LDD 


H 


SUBR4 




1407 


69 


1210 


1213 


H0001 


RAL 


1958 




RELOCATE 


0902 


65 


1958 


1263 




SLO 


20001 




D OR C 


1263 


16 


1014 


1319 




BMI 


1564 


1563 




1319 


46 


1564 


1563 


H0002 


-5RT 


0008 




C D OR F 


0903 


30 


0008 


1221 




AUP 


1500 


8003 




1221 


10 


0974 


8003 


1563 


RAL 


CDIFF 


CDD 


C 


1563 


65 


1264 


1369 


1564 


RAL 


DDIFF 


CDD 


D 


1564 


65 


0975 


1369 


1566 


RAL 


1958 


J0001 


F 


1566 


65 


1958 


0944 


CDD 


ALO 


1958 


J0001 




1369 


15 


1958 


0944 


H0003 


NOP 

REG 
REG 


0000 

J0960 
F0955 


G0003 

0960 
0955 


SYMBOLIC 
I 


0904 


00 


0000 


0943 


PROI 


LDD 


PUNCH 




SET I EXIT 


1190 


69 


1350 


1553 




STD 


EXITX 






1553 


24 


1196 


1099 




RAU 


1953 




WHAT IS I 


1099 


60 


1953 


1457 




LDD 


M 


SUBR4 




1457 


69 


1260 


1213 


MO 001 


RAL 


1959 




RELOCATE 


0905 


65 


1959 


1313 




SLO 


20001 




D OR C 


1313 


16 


1014 


1419 




BMI 


1568 


1567 




1419 


46 


1568 


1567 


M0002 


SRT 


0008 




C D OR F 


0906 


30 


0008 


1175 




AUP 


1504 


8003 




1175 


10 


0978 


8003 


1567 


RAL 


CDIFF 


CDI 


C 


1567 


65 


1264 


1469 


1568 


RAL 


DDIFF 


CDI 


D 


1568 


65 


0975 


1469 


1570 


RAL 


1959 


J'OOOl 


F 


1570 


65 


1959 


0960 


CDI 


ALO 


1959 


J0001 




1469 


15 


1959 


0960 


MO 00 3 


NOP 


0000 


F0003 


SYMBOLIC 


0907 


00 


0000 


0957 


Q 


00 


0000 


Q0001 


CONSTANTS 


1195 


00 


0000 


0908 


9060 


00 


0000 


9060 




1272 


00 


0000 


9060 


H 


00 


0000 


H0001 




1210 


00 


0000 


0902 


1500 


00 


0000 


1500 




0974 


00 


0000 


1500 



67 



M 


00 


0000 


M0001 


1504 


00 


0000 


1504 


XXXX1 


01 
HED 


0000 


XXXX1 






BOP ROUTINE 


1001 


LDD 




SUB16 




RAU 


RE ADC 


SUB10 






BLR ROUTINE 


1002 


RAL 


1959 


BLR 


BLR 


SLO 


1958 






AUP 


8001 






LDD 


SETCC 


SUB2R 






RBR ROUTINE 


1012 


RAU 


DDIFF 






ALO 


1959 


BLR 






BLA ROUTINE 


1003 


LDD 


H8XXX 






STD 


DRUMT 






RAL 


1959 






SLO 


1958 


- 




AUP 


8001 






LDD 


SETCC 


SUB2U 






REG ROUTINE 




HED 


R 




1004 


RAL 


1952 






SRT 


0008 






SLO 


90XXX 






BMI 




1002 




ALO 


29XXX 






BMI 


1002 






SLT 


0004 






ALO 


ST 






AUP 


1958 






AUP 


H9XXX 


8002 


8002 


STU 


9999 


1002 


ST 


STU 

HED 


1021 


1002 




1 


EQU REQ , 


AND SYN 




HED 


Z 




1005 


LDD 


H8XXX 


BOTH 


1006 


LDD 


H9XXX 


BOTH 


BOTH 


STD 


TAG 


- 





1260 


00 


0000 


0905 




0978 


00 


0000 


1504 


ERASEABLE 


1961 


01 


0000 


1961 



INITIALIZE 
PUNCH 


1001 
1404 


69 
60 


1404 
1950 


1353 
1405 


RESERVE 
FWA TO 
LWA 


1002 
1363 
1413 
1271 


65 
16 
10 
69 


1959 
1958 
8001 
1400 


1363 
1413 
1271 
1503 




1012 
1229 


60 
15 


0975 
1959 


1229 
1363 


SET DRUM 

TAG TO 8 

UNRESERVE 

FWA 

TO 

LWA 


1003 
1309 
1215 
1463 
1513 
1321 


69 
24 
65 
16 
10 
69 


1406 
1212 
1959 
1958 
8001 
1400 


1309 
1215 
1463 
1513 
1321 
1603 



IS 


1004 


65 


1952 


1507 


REGION 


1507 


30 


0008 


1225 


CHARACTER 


1225 


16 


1178 


1233 


ALPHABETIC 


1233 


46 


0986 


1002 




0986 


15 


1189 


1243 




1243 


46 


1002 


1197 


STORE 


1197 


35 


0004 


1557 


REGION 


1557 


15 


1310 


1265 


ORIGIN 


1265 


10 


1958 


1613 




1613 


10 


1216 


8002 




8002 


21 


9999 


1002 


CONSTANTS 


1310 


21 


1021 


1002 



EQU 
SYN 



1005 
1006 
1359 



69 

69 
24 



1406 
1216 
1262 



1359 
1359 
1315 



68 





RAU 


1953 




WHAT IS I' 


1315 


60 


1953 


1607 




LDO 


Z 


SUBR4 




1607 


69 


1360 


1213 


ZOOOl 


RAL 


1959 


YOOOl 


ABSOLUTE 


0917 


65 


1959 


0915 


Z0002 


LDD 


Y 


SUBR9 


REGIONAL 


0918 


69 


1371 


1174 


YOOOl 


STL 


E 


TD 




0915 


20 


1519 


1322 


Y0002 


RAL 


P0010 


BP 


REG ERROR 


0916 


65 


1986 


1191 


Z0OO3 


LDO 


w 


SUBR6 


SYMBOLIC 


0919 


69 


1372 


1275 


WOOOl 


RAL 


EQUIV 


YOOOl 


S DEFINED 


0920 


65 


1223 


0915 


W0002 


RAL 


P0010 


BP 


S UNDEFIND 


0921 


65 


1986 


1191 


W0003 


RAL 


P0010 


BP 


S TAB FULL 


0922 


65 


1986 


1191 


TD 


RAU 


1952 




HEAD D 


JL D £ tL 


60 


1952 


1657 




LDD 




SUB15 


AND EQUATE 


1657 


69 


1410 


1663 




LDD 


V 


SUBR6 


TO E 


1410 


69 


1713 


1275 


V0003 


RAL 


P0010 


BP 


S TAB FULL 


0912 


65 


1986 


1191 


VOOOl 


ALO 


E 


SD 




0910 


15 


1519 


1273 


V0002 


ALO 


E 


SD 




0911 


15 


1519 


1273 


SD 


LDD 


TT 


SUBR7 




1273 


69 


0976 


1279 


TT 


LDD 


TAG 




TEST TAG 


0976 


69 


12.62 


1365 




BDO 


SETCC 






1365 


90 


1400 


0970 




RAU 


E 




RESERVE E 


0970 


60 


1519 


1323 




LDD 


SETCC 


SUB2R 




1323 


69 


1400 


1503 


1011 


LDD 


H8XXX 




REQ 


1011 


69 


1406 


1409 




STD 


TAG 




ROUTINE 


1409 


24 


1262 


1415 




RAL 


1959 




IS I 


1415 


65 


1959 


1763 




SLO 


20001 




DRUM COR 


1763 


16 


1014 


1569 




BMI 









1569 


46 


1422 


1373 




ALO 


CDIFF 


CD 




1373 


15 


1264 


1619 


D 


ALO 


DDIFF 


CD 




1422 


15. 


0975 


1619 


CD 


ALO 


20001 


YOOOl 




1619 


15 


1014 


0915 


Z 


00 


0000 


ZOOOl 


CONSTANTS 


1360 


00 


0000 


0917 


Y 


00 


0089 


YOOOl 




1371 


00 


0089 


0915 


W 


00 


0000 


WOOOl 




1372 


00 


0000 


0920 


V 


00 


0000 


VOOOl 




1713 


00 


0000 


0910 


88 


00 


8800 


0000 




1500 


00 


8800 


0000 


BP"" 


ALO 


88 




BY PASS 


1191 


15 


1500 


1505 




STL 


P0010 


PUNCH 




1505 


20 


1986 


1350 


TAG 


01 


0000 


TAG 


ERASEABLE 


1262 


01 


0000 


1262 


E 


01 
HED 


0000 


E 




1519 


01 


0000 


1519 






ALF ROUTINE 












1007 


LDD 




PROCL 


PROCES LOC 


1007 


69 


1460 


0969 




LDD 


1952 






1460 


69 


1952 


1555 




STD 


P0007 






1555 


24 


1983 


1186 




RAL 


1953 




REPLACE 


1186 


65 


1953 


1707 




NZE 


PUNCH 




BLANK I 


1707 


45 


1350 


1461 




LDD 


S0AP2 




BY 


1461 


69 


1314 


1017 




STD 


P0003 


PUNCH 


S0AP2 


1017 


24 


1979 


1350 



69 



S0AP2 ALF S0AP2 S0AP2 
PAT ROUTINE 



CONSTANT 



1008 


RAU 




SUB10 




LDD 


READC 


SUB14 






HED ROUTINE 


1009 


RAL 


1952 






SRT 


0008 






STL 


OOOOH 


SETCC 






REL ROUTINE 




HED 


M 




1010 


RAL 


1952 






NZE 




SDD 




RAL 


1958 


SDD 


SDD 


STL 


DDIFF 






RAL 


1953 






NZE 




SCD 




RAL 


1959 


SCD 


SCD 


STL 


CDIFF 


SETCC 


DDIFF 


01 


0000 


DDIFF 


CDIFF 


01 
HED 


0000 


CDIFF 






LOAD AVAILABILJ 




HED 


L 




1999 


RAL 


1951 






SRT 


0004 






SLT 


0004 






ALO 


8002 






ALO 


8002 






ALO 


CI 






AUP 


C2 


8003 


8003 


LDD 


9995 


8002 


8002 


STD 


9994 


TUP 


TUP 


SUP 


TW 






NZU 




READC 




AUP 


TWP2 






ALO 


1DXXX 


8003 


CI 


STD 


A'OOOl 


TUP 


C2 


LDD 


1952 


8002 


TW 


LDD 


1958 


8002 


TWP2 


LDD 

HED 


1960 


8002 



STORE 

HEADING 

CHARACTER 



1314 82 7661 7792 



1008 60 1511 1405 
1511 69 1950 1403 



1009 65 1952 1757 
1757 30 0008 1325 
1325 20 1329 1400 



SET 


1010 


65 


1952 


1807 


DRUM 


1807 


45 


1510 


1561 


AND 


1510 


65 


1958 


1561 


CORE 


1561 


20 


0975 


1228 


DELTAS 


1228 


65 


1953 


1857 




1857 


45 


1560 


1611 




1560 


65 


1959 


1611 




1611 


20 


1264 


1400 


ERASEABLE 


0975 


01 


0000 


0975 




1264 


01 


0000 


1264 



CALC 


1999 


65 


1951 


1605 


LOC 


1605 


30 


0004 


1465 


W2 


1465 


35 


0004 


1375 




1375 


15 


. 8002 


1283 




1283 


15 


8002 


1241 




1241 


15 


0994 


1149 




1149 


10 


1352 


8003 


LOAD 


8003 


69 


9995 


8002 


TABLE 


8002 


24 


9994 


1247 




1247 


11 


1550 


1655 




1655 


44 


1459 


1950 




1459 


10 


1312 


1167 




1167 


15 


1020 


8003 


CONSTANTS 


0994 


24 


0600 


1247 




1352 


69 


1952 


8002 




1550 


69 


1958 


8002 




1312 


69 


1960 


8002 



70 



OPTIMIZING TABLE 



N0001 


00 


0404 


0998 


NOP 


0800 


00 


0404 


998 


N0OO2 


00 


0404 


0998 


HLT 


0801 


00 


0404 


0998 


N0003 


33 


2322 


0999 


UFA 


0802 


33 


2322 


0999 


N0004 


00 


0505 


0998 


RTC 


0803 


00 


0505 


998 


N00O5 


00 


0505 


0998 


RTN 


0804 


00 


0505 


0998 


N0006 


00 


0505 


0998 


RTA 


0805 


00 


0505 


0998 


-NO 00 7 


00 


0505 


0998 


WTN 


0806 


00 


0505 


998 


N0008 


00 


0505 


0998 


WTA 


0807 


00 


0505 


0998 


N0009 


33 


1212 


0999 


LIB 


0808 


33 


1212 


999 


N0010 


33 


0202 


0999 


LDI 


0809 


33 


0202 


999 


N0011 


33 


0504 


0999 


AUP 


0810 


33 


0504 


999 


N0012 


33 


0504 


0999 


SUP 


0811 


33 


0504 


0999 


N0013 


99 


9999 


9999 


NOT USED 


0812 


99 


9999 


9999 


N0014 


99 


9999 


9999 


NOT USED 


0813 


99 


9999 


9999 


N0015 


33 


1110 


0999 


DIV 


0814 


33 


1110 


999 


N0016 


33 


0504 


0999 


ALO 


0815 


33 


0504 


0999 


N0017 


33 


0504 


0999 


SLO 


0816 


33 


0504 


0999 


N0018 


33 


0504 


0999 


AMI 


0817 


33 


0504 


0999 


N0019 


33 


0504 


0999 


SML 


0818 


33 


0504 


0999 


N0020 


33 


2120 


0999 


MPY 


0819 


33 


2120 


999 


N0021 


54 


0303 


999 


STL 


0820 


54 


0303 


0999 


N0022 


45 


0303 


0999 


STU 


0821 


45 


0303 


0999 


N0023 


34 


0303 


0999 


SDA 


0822 


34 


0303 


0999 


N0024 


34 


0303 


0999 


SIA 


0823 


34 


0303- 


0999 


N0025 


33 


0303 


0999 


STD 


0824 


33 


0303 


999 


N0026 


44 


0505 


0998 


NTS 


0825 


44 


0505 


998 


N0027 


00 


0505 


0998 


BIN 


0826 


00 


0505 


0998 


N0028 


00 


0505 


0998 


SET 


0827 


00 


0505 


0998 


N0029 


33 


1212 


0999 


SIB 


0828 


33 


1212 


999 


N0030 


33 


0202 


0999 


STI 


0829 


33 


0202 


999 


N0031 


00 


0000 


0988 


SRT 


0830 


00 


0000 


988 


N0032 


00 


0000 


0888 


SRD 


0831 


00 


0000 


0888 


N0033 


33 


2726 


0999 


FAD 


0832 


33 


2726 


0999 


N0034 


33 


2726 


0999 


FSB 


0833 


33 


2726 


999 


N0035 


33 


0000 


999 


FDV 


0834 


33 


0000 


0999 


N0036 


00 


0000 


0988 


SLT 


0835 


00 


0000 


0988 


N0037 


00 


0000 


0988 


SCT 


0836 


00 


0000 


988 


N0038 


33 


2726 


0999 


FAM 


0837 


33 


2726 


0999 


N0039 


33 


2726 


0999 


FSM 


0838 


33 


2726 


0999 


N0040 


33 


0000 


999 


FMP 


0839 


33 


0000 


0999 


N0041 


33 


0404 


0998 


N2A 


0840 


33 


0404 


998 


N0042 


33 


0404 


0998 


BMA 


0841 


33 


0404 


0998 


N0043 


33 


0404 


0998 


N2B 


0842 


33 


0404 


0998 


N0044 


33 


0404 


0998 


8MB 


0843 


33 


0404 


0998 


N0045 


34 


0405 


998 


NZU 


0844 


34 


0405 


998 


N0046 


43 


0504 


0998 


NZE 


0845 


43 


0504 


0998 


N0047 


33 


0404 


0998 


BMI 


0846 


33 


0404 


0998 


N0048 


33 


0505 


0998 


BOV 


0847 


33 


0505 


998 


N0049 


33 


0404 


0998 


NZC 


0848 


33 


0404 


998 


N0050 


33 


0404 


0998 


BMC 


0849 


33 


0404 


0998 


N0051 


00 


0000 


0898 


AXA 


0850 


00 


0000 


898 


N0052 


00 


0000 


0898 


SXA 


0851 


00 


0000 


0898 


N0053 


00 


0000 


0898 


AXB 


0852 


00 


0000 


0898 
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N0054 


00 


0000 


0898 


SXB 


0853 


00 


0000 


0898 


N0055 


44 


0505 


0998 


NEF 


0854 


44 


0505 


0998 


N0056 


00 


0505 


0998 


RWD 


0855 


00 


0505 


998 


N0057 


00 


0505 


0998 


WTM 


0856 


00 


.0505 


0998 


N0058 


00 


0505 


0998 


BST 


0857 


00 


0505 


0998 


N0059 


00 


0000 


0898 


AXC 


0858 


00 


0000 


0898 


N0060 


00 


0000 


0898 


SXC 


0859 


00 


0000 


0898 


N0061 


33 


0504 


999 


RAU 


0860 


33 


0504 


0999 


N0062 


33 


0504 


0999 


RSU 


0861 


33 


0504 


0999 


N0063 


99 


9999 


9999 


NOT USED 


0862 


99 


9999 


9999 


N0064 


99 


9999 


9999 


NOT USED 


0863' 


99 


9999 


9999 


N0065 


33 


1110 


0999 


DVR 


0864 


33 


1110 


999 


N0066 


33 


0504 


0999 


RAL 


0865 


33 


0504 


0999 


N0067 


33 


0504 


0999 


RSL 


0866 


33 


0504 


0999 


N0068 


33 


0504 


0999 


RAM 


0867 


33 


0504 


0999 


N0069 


33 


0504 


0999 


RSM 


0868 


33 


0504 


0999 


N0070 


33 


0303 


0999 


LDD 


0869 


33 


0303 


0999 


N0071 


00 


0000 


0999 


RD1 


0870 


00 


0000 


0999 


N0072 


00 


0000 


0999 


WR1 


0871 


00 


0000 


0999 


N0073 


00 


0000 


0999 


RC1 


0872 


00 


0000 


0999 


N0074 


00 


0000 


0999 


RD2 


0873 


00 


0000 


0999 


N0075 


00 


0000 


0999 


WR2 


0874 


00 


0000 


0999 


N0076 


00 


0000 


0999 


RC2 


0875 


00 


0000 


0999 


N0077 


00 


0000 


0999 


RD3 


0876 


00 


0000 


0999 


N0078 


00 


0000 


0999 


WR3 


0877 


00 


0000 


0999 


N0079 


00 


0000 


0999 


RC3 


0878 


00 


0000 


0999 


N0080 


00 


0505 


0999 


RPY 


0879 


00 


0505 


0999 


N0081 


00 


0000 


0898 


RAA 


0880 


00 


0000 


0898 


N0082 


00 


0000 


0898 


RSA 


0881 


00 


0000 


0898 


N0083 


00 


0000 


0898 


RAB 


0882 


00 


0000 


0898 


N0084 


00 


0000 


0898 


RSB 


0883 


00 


0000 


0898 


N0085 


33 


0506 


0999 


TLU 


0884 


33 


0506 


0999 


N0086 


00 


0606 


0998 


SDS 


0885 


00 


0606 


0998 


N0087 


00 


0606 


0998 


RDS 


0886 


00 


0606 


0998 


N0088 


00 


0606 


0998 


WDS 


0887 


00 


60 6 


0998 


N0089 


00 


0000 


0898 


RAC 


0888 


00 


0000 


0898 


N0090 


00 


0000 


0898 


RSC 


0889 


00 


0000 


0898 


N0091 


44 


0505 


0998 


BDO 


0890 


44 


0505 


0998 


N0092 


33 


0505 


0998 


BD1 


0891 


33 


0505 


0998 


N0093 


33 


0505 


0998 


BD2 


0892 


33 


0505 


0998 


N0094 


33 


0505 


0998 


BD3 


0893 


33 


0505 


0998 


N0095 


33 


0505 


0998 


BD4 


0894 


33 


0505 


0998 


N0096 


33 


0505 


0998 


BD5 


0895 


33 


0505 


0998 


N0097 


33 


0505 


0998 


BD6 


0896 


33 


0505 


0998 


N0098 


33 


0505 


998 


BD7 


0897 


33 


0505 


0998 


N0099 


33 


0505 


998"' 


BD8 


0898 


33 


0505 


0998 


N0100 


44 


0505 
SYMBOLIC 


0998 
OP TABLE 


BD9 


0899 


44 


0505 


0998 


COOOl 


61 


7366 


1007 


ALF 


1050 


61 


7366 


1007 


C0002 


61 


7376 


0015 


ALO 


1051 


61 


7376 


0015 


C0003 


61 


7473 


0017 


AML 


1052 


61 


7473 


0017 


C0004 


61 


8477 


0010 


AUP 


1053 


61 


8477 


0010 


C0005 


61 


8761 


0050 


AXA 


1054 


61 


8761 


0050 
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C0006 


61 


8762 


0052 


AXB 


1055 


61 


8762 


0052 


C0007 


61 


8763 


0058 


AXC 


1056 


61 


8763 


0058 


C0008 


62 


6476 


0090 


BDO 


1057 


62 


6476 


0090 


C0009 


62 


6491 


0091 


BD1 


1058 


62 


6491 


0091 


C0010 


62 


6492 


0092 


BD2 


1059 


62 


6492 


0092 


coon 


62 


6493 


0093 


BD3 


1060 


62 


6493 


0093 


C0012 


62 


6494 


00 94 


BD4 


1061 


62 


6494 


0094 


C0013 


62 


6495 


0095 


BD5 


1062 


62 


6495 


0095 


C0014 


62 


6496 


0096 


BD6 


1063 


62 


6496 


0096 


C0015 


62 


6497 


0097 


BD7 


1064 


62 


6497 


0097 


CO016 


62 


6498 


0098 


BD8 


1065 


62 


6498 


0098 


COO 17 


62 


6499 


0099 


B09 


1066 


62 


6499 


0099 


C0018 


62 


6975 


0026 


BIN 


1067 


62 


6975 


0026 


C0019 


62 


7361 


1003 


BLA 


1068 


62 


7361 


1003 


C0020 


62 


7379 


1002 


BLR 


1069 


62 


7379 


1002 


C0021 


62 


7461 


0041 


BMA 


1070 


62 


7461 


0041 


C0022 


62 


7462 


0043 


BMB 


1071 


62 


7462 


0043 


C0023 


62 


7463 


0049 


BMC 


1072 


62 


7463 


0049 


C0024 


62 


7469 


0046 


BMI 


1073 


62 


7469 


0046 


C0025 


62 


7677 


1001 


BOP 


1074 


62 


7677 


1001 


C0026 


62 


7685 


0047 


BOV 


1075 


62 


7685 


0047 


C0027 


62 


8283 


0057 


BST 


1076 


62 


8283 


0057 


C0028 


64 


6985 


0014 


DIV 


1077 


64 


6985 


0014 


C0029 


64 


8579 


0064 


DVR 


1078 


64 


8579 


0064 


C0030 


65 


7884 


1005 


EQU 


1079 


65 


7884 


1005 


C0031 


66 


6164 


0032 


FAD 


1080 


66 


6164 


0032 


C0032 


66 


6174 


0037 


FAM 


1081 


66 


6174 


0037 


C0033 


66 


6485 


0034 


FDV 


1082 


66 


6485 


0034 


C0034 


66 


7477 


0039 


FMP 


1083 


66 


7477 


0039 


C0035 


66 


8262 


0033 


FSB 


1084 


66 


8262 


0033 


C0036 


66 


8274 


0038 


FSM 


1085 


66 


8274 


0038 


C0037 


68 


6564 


1009 


HED 


1086 


68 


6564 


1009 


C0038 


68 


7383 


0001 


HLT 


1087 


68 


7383 


0001 


C0039 


73 


6464 


0069 


LDD 


1088 


73 


6464 


0069 


C0040 


73 


6469 


0009 


LDI 


1089 


73 


6469 


0009 


C0041 


73 


6962 


0008 


LIB 


1090 


73 


6962 


0008 


C0042 


74 


7788 


0019 


MPY 


1091 


74 


7788 


0019 


C0043 


75 


6566 


0054 


NEF 


1092 


75 


6566 


0054 


C0044 


75 


7677 


0000 


NOP 


1093 


75 


7677 


0000 


C0045- 


75 


8382 


0025 


NTS 


1094 


75 


8382 


0025 


C0046 


75 


8961 


0040 


NZA 


1095 


75 


8961 


0040 


C0047 


75 


8962 


0042 


NZB 


1096 


75 


8962 


0042 


C0048 


75 


8963 


0048 


NZC 


1097 


75 


8963 


0048 


C0051 


75 


8965 


0045 


NZE 


1100 


75 


8965 


0045 


C0052 


75 


8984 


0044 


NZU 


1101 


75 


8984 


0044 


C0053 


77 


6183 


1008 


PAT 


1102 


77 


6183 


1008 


C0054 


77 


6368 


0071 


PCH 


1103 


77 


6368 


0071 


CO055 


79 


6161 


0080 


RAA 


1104 


79 


6161 


0080 


C0056 


79 


6162 


0082 


RAB 


1105 


79 


6162 


0082 


C0057 


79 


6163 


0088 


RAC 


1106 


79 


6163 


0088 


C0058 


79 


6173 


0065 


RAL 


1107 


79 


6173 


0065 


C0059 


79 


6174 


0067 


RAM 


1108 


79 


6174 


0067 


C0060 


79 


6184 


0060 


RAU 


1109 


79 


6184 


0060 


C0061 


79 


6279 


1012 


RBR 


1110 


79 


6279 


1012 


C0062 


79 


6364 


0070 


RCD 


1111 


79 


6364 


0070 
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C0063 79 6391 0072 RC1 1112 

C0064 79 6392 0075 RC2 1113 

C0065 79 6393 0078 RC3 1114 

C0066 79 6482 0086 RDS 1H5 

C0067 79 6491 0070 RD1 1116 

C0068 79 6492 0073 RD2 1117 

C0069 79 6493 0076 RD3 1118 

C0070 79 6567 1004 REG 1119 

C0071 79 6573 1010 REL 1120 

C0072 79 6578 1011 REQ H21 

C0073 79 7788 0079 RPY 1122 

C0074 79 8261 0081 RSA H23 

C0075 79 8262 0083 RSB 1124 

C0076 79 8263 0089 RSC 1125 

C0077 79 8273 0066 RSL 1126 

C0078 79 8274 0068 RSM 1127 

C0079 79 8284 0061 RSU U28 

C0080 79 8361 0005 RTA H29 

C0081 79 8363 0003 RTC 1130 

C0082 79 8375 0004 RTN H31 

C0083 79 8664 0055 RWD H32 

C0084 82 6383 0036 SCT 1133 

C0085 82 6461 0022 SDA U34 

C0086 82 6482 0085 SDS 1135 

C0087 82 6583 0027 SET 1136 

C0088 82 6961 0023 SIA 1137 

C0089 82 6962 0028 SIB 1138 

C0090 82 7376 0016 SLO 1139 

C0091 82 7383 0035 SLT 1140 

C0092 82 7473 0018 SML H41 

C0093 82 7964 0031 SRD H42 

C0.094 82 7983 0030 SRT 1143 

C0095 82 8364 0024 STD 1144 

C0096 82 8369 0029 STI 1145 

C0097 82 8373 0020 STL 1146 

C0098 82 8384 0021 STU H47 

C0101 82 8477 0011 SUP 1150 

C0102 82 8761 0051 SXA 1151 

C0103 82 8762 0053 SXB 1152 

C0104 82 8763 0059 SXC 1153 

C0105 82 8875 1006 SYN 1154 

C0106 83 7384 0084 TLU H55 

C0107 $4 6661 0002 UFA 1156 

C0108 86 6482 0087 WDS 1157" 

C0109 86 7991 0071 WRl H58 

C0110 86 7992 0074 WR2 1159 

C0111 86 7993 0077 WR3 1160 

C0112 86 8361 0007 WTA 1161 

C0113 86 8374 0056 WTM U62 

C0114 86 8375 0006 WTN 1163 

C0115 99 9999 0001 TABLE END 1164 



79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

79 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

82 

83 

84 

86 

86 

86 

86 

86 

86 

86 

99 



6391 

6392 

6393 

6482 

6491 

6492 

6493 

6567 

6573 

6578 

7788 

8261 

8262 

8263 

8273 

8274 

8284 

8361 

8363 

8375 

8664 

6383 

6461 

6482 

6583 

6961 

6962 

7376 

7383 

7473 

7964 

7983 

8364 

8369 

8373 

8384 

8477 

8761 

8762 

8763 

8875 

7384 

6661 

6482 

7991 

7992 

7993 

8361 

8374 

8375 

9999 



0072 

0075 

0078 

0086 

0070 

0073 

0076 

1004 

1010 

1011 

0079 

0081 

0083 

0089 

0066 

0068 

0061 

0005 

0003 

0004 

0055 

0036 

0022 

0085 

0027 

0023 

0028 

0016 

0035 

0018 

0031 

0030 

0024 

0029 

0020 

0021 

0011 

0051 

0053 

0059 

1006 

0084 

0002 

0087 

0071 

0074 

0077 

0007 

0056 

0006 

0001 
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SUB 1 STORE K IN FWA TO LWA 





HED 


1 




SUBR1 


STD 


EXITX 






STU 


XXXX1 






LDD 


FWA 






SDA 


FWA 






SLT 


0004 






SDA 


XXXX2 






RAU 


FWA 






ALO 


XXXX1 


8003 


8003 


STL 


9999 


NEXT 


NEXT 


SUP 


XXXX2 






NZU 




EXITX 




AUP 


8001 






AUP 


1DXXX 


8003 


FWA 


STL 


9998 


NEXT 


XXXX2 


01 
HED 


0000 


XXXX2 



STORE EXIT 


1600 


24 


1196 


1199 


STORE K 


1199 


21 


1961 


1364 


SET 


1364 


69 


1217 


1170 


FWA 


1170 


22 


1217 


1220 


LWA 


1220 


35 


0004 


1181 


ADDRESSES 


1181 


22 


1962 


1515 




1515 


60 


1217 


1421 




1421 


15 


1961 


8003 


STORE K 


8003 


20 


9999 


1402 


END OF 


1402 


11 


1962 


1267 


LOOP TEST 


1267 


44 


1471 


1196 




1471 


10 


8001 


1379 


STEP 


1379 


10 


1020 


8003 


CONSTANTS 


1217 


20 


9998 


1402 


ERASEABLE 


1962 


01 


0000 


1962 



SUB 2 RESERVE UNRESERVE 





HED 


2 




SUB2R 


STD 


EXITY 






LDD 


Z 


- RU 


SUB2U 


STD 


EXITY 






LDD 


11 


RU 


RU 


STD 


W 






STL 


N 






SLO 


8001 






AUP 


8003 






SRT 


0003 






STU 


X 






SUP 


8001 






SLT 


0001 






STU 


P 






SUP 


8001 






SLT 


0002 






AUP 


8003 






AUP 


X 






ALO 


P 






SLT 


0004 






ALO 


CI 






STL 


B0002 






LDD 


C2 






SDA 


SPR 






AUP 


C3 


SU 


SU 


STU 


SA 






AUP 


C4 


8003 


8003 


RAL 


9992 


B0002 


B0002 


SLT 


0009 


XX 


XX 


STU 


UH 






SLT 


0001 






RAL 


8002 





RESERVE 


1503 


24 


1813 


1316 


ENTRY 


1316 


69 


1769 


1472 


UNRESERVE 


1603 


24 


1813 


1366 


ENTRY 


1366 


69 


1565 


1472 


SET W 


1472 


24 


1246 


1299 


STORE N 


1299 


20 


1653 


1556 


CALC AO 


1556 


16 


8001 


1913 


AND PO 


1913 


10 


8003 


1571 




1571 


30 


0003 


1479 




1479 


21 


1284 


1287 




1287 


11 


8001 


1245 




1245 


35 


0001 


1451 




1451 


21 


1606 


1609 




1609 


11 


8001 


1367 




1367 


35 


0002 


1473 




1473 


10 


8003 


1281 




1281 


10 


1284 


1239 




1239 


15 


1606 


1711 




1711 


35 


0004 


1621 




1621 


15 


1506 


1761 




1761 


20 


0901 


1554 




1554 


69 


1188 


1291 




1291 


22 


1231 


1334 




1334 


10 


1337 


1423 




1423 


21 


1401 


1604 




1604 


10 


1558 


8003 




8003 


65 


9992 


0901 




0901 


35 


0009 


1521 




1521 


21 


1176 


1429 




1429 


35 


0001 


1185 




1185 


65 


8002 


1293 



75 





AUP 


W 






1293 


10 


1246 


1351 




SRT 


0001 






1351 


30 


0001 


1907 




AUP 


UH 


SPR 




1907 


10 


1176 


1231 


SPR 


SRT 


0009 


SA 




1231 


30 


0009 


1401 


SA 


STL 


9983 


B0001 




1401 


20 


9983 


0900 


B0001 


RAL 


N 




IS N ZERO 


0900 


65 


1653 


1308 




NZE 




EXITY 




1308 


45 


1362 


1813 




SLO 


11 




REDUCE N 


1362 


16 


1565 


1669 




STL 


N 




BY 1 


1669 


20 


1653 


1456 




RAU 


SA 




IS AI 


1456 


60 


1401 


1705 




SUP 


A197 




IN LAST 


1705 


11 


1358 


1863 




BMI 




TP 


BLOCK OF 


1863 


46 


1266 


1317 




AUP 


A201 


SU 


4 


1266 


10 


1719 


1423 


TP 


RAL 


SPR 




IS P 9 


1317 


65 


1231 


1235 




SLO 


C2 






1235 


16 


1188 


1343 




NZE 




ZP 




1343 


45 


1296 


1297 




ALO 


C5 




STEP P 


1296 


15 


1249 


1703 




LDD 


CI 






1703 


69 


1506 


1509 




SDA 


B0002 






1509 


22 


0901 


1454 




STL 


SPR 






1454 


20 


1231 


1184 




RAU 


SA 




REDUCE AI 


1184 


60 


1401 


1755 




SUP 


C6 


SU 


BY 196 


1755 


11 


1408 


1423 


IP 


LDD 


CI 




SET P 


1297 


69 


1506 


1559 




STD 


B0002 




TO ZERO 


1559 


24 


0901 


1504 




LDD 


C7 






1504 


69 


1458 


1661 




STD 


SPR 






1661 


24 


1231 


1234 




RAU 


SA 




REDUCE AI 


1234 


60 


1401 


1805 




SUP 


C8 


SU 


BY 195 


1805 


11 


1508 


1423 


CI 


SLT 


0000 


XX 


CONSTANTS 


1506 


35 


0000 


1521 


C2 


SRT 


0009 


SA 




1188 


30 


0009 


1401 


C3 


STL 


A0001 


B0001 




1337 


20 


0600 


0900 


C4 


45 


0000 


0001 




1558 


45 


0000 


0001 


11 


00 


0000 


0001 




1565 


00 


OOOO 


0001 


A197 


STL 


A0197 


B0001 




1358 


20 


0796 


0900 


A201 


STL 


A0201 


B0001 




1719 


20 


0800 


0900 


C5 


SRT 


0010 


SA 




1249 


30 


0010 


1401 


C6 


00 


0196 


0000 




1408 


00 


0196 


0000 


C7 


SRT 


0000 


SA 




1458 


30 


0000 


1401 


C8 


00 


0195 


0000 




1508 


00 


0195 


0000 


Z 


00 


0000 


0000 




1769 


00 


0000 


0000 


W 


01 


0000 


W 


ERASEABLE 


1246 


01 


0000 


1246 


N 


01 


0000 


N 




1653 


01 


0000 


1653 


BO 00 2 


01 


0000 


B0002 




0901 


01 


0000 


0901 


SPR 


01 


0000 


SPR 




1231 


01 


0000 


1231 


SA 


01 


0000 


SA 




1401 


01 


0000 


1401 


UH 


01 


0000 


UH 




1176 


01 


0000 


1176 


X 


01 
HED 


0000 


X 




1284 


01 


0000 


1284 






SUB 3 PROCESS OP 


CODE 












HED 


3 















76 



SUBR3 



8002 
NEXT 



SNO 



8002 
NEX 

NUM 



ILLOP 



PSEU 



STD 
RAL 
SRT 
NZE 
SLT 
NZU 
SRT 
STL 
SLO 
TLU 
ALO 
RAL 
SLO 
SLT 
NZU 
SLT 
NZU 
SLT 
STL 
SRT 
ALO 
LDD 
STD 

SLO 
SLT 
SLO 
SRT 
ALO 

RAL 
ALO 
STL 
LDD 

SLT 
ALO 
ALO 

RAL 
10 

LDD 
90 
00 
55 

HED 



EXITX 
1954 
0004 

0006 

0002 
XXXX1 

8001 
C0001 
1 

9997 
XXXX1 

0006 
ILLOP 

0001 
PSEU 

0001 
P0007 

0004 
3 

9996 
0PT1M 



0002 
8002 
0001 
8001 

P0010 
5 

P0010 
6 

0003 
EXITX 
II XXX 

0000 
0000 
N0001 
9000 
0000 
0505 



ILLOP 
NUM 



8002 
NEXT 



SNO 



8002 
NEX 
EXITX 



SNO 



NEX 



8002 

NEXT 
0000 

NEX 
0000 
0008 
0999 



STORE EXIT 


0996 


24 


1196 


1349 




1349 


65 


1954 


1659 


IS OP 


1659 


30 


0004 


1819 


BLANK 


1819 


45 


1522 


1013 


IS OP 


1522 


35 


0006 


1387 


NUMERIC 


1387 


44 


1341 


1192 




1341 


30 


0002 


1347 


SEARCH 


1347 


20 


1961 


1414 


SYMBOLIC 


1414 


16 


8001 


1671 


OP TABLE 


1671 


84 


1050 


1855 




1855 


15 


1608 


8002 


IS 


8002 


65 


9997 


1501 


SYM OP 


1501 


16 


1961 


1615 


LEGAL 


1615 


35 


0006 


1529 




1529 


44 


1013 


1384 


TEST FOR 


1384 


35 


0001 


1391 


PSEUDO OP 


1391 


44 


1295 


1346 


STORE NUM 


1346 


35 


0001 


1753 


650 OP 


1753 


20 


1983 


1236 


GET OPTIM 


1236 


30 


0004 


1397 


CONSTANTS 


1397 


15 


1650 


8002 




8002 


69 


9996 


1399 




1399 


24 


1452 


1196 


FORM 


1192 


16 


1345 


1449 


NUMERIC 


1449 


35 


0002 


1905 


OP 


1905 


16 


8002 


1963 


CODE 


1963 


30 


0001 


1869 




1869 


15 


8001 


1753 


ILLEGAL OP 


1013 


65 


1986 


1441 


SET 8 


1441 


15 


1194 


1499 


FOR BLANK 


1499 


20 


1986 


1289 


OP 


1289 


69 


1242 


1399 


PSEUDO 


1295 


35 


0003 


1803 


OP 


1803 


15 


1196 


1551 




1551 


15 


0992 


8002 


CONSTANTS 


1608 


65 


0000 


1501 




1700 


10 


0000 


0000 




1650 


69 


0800 


1399 




1345 


90 


9000 


0000 




1194 


00 


0000 


0008 




1242 


55 


0505 


0999 



SUB 4 WHAT IS ADDRESS 



SUBR4 



HED 


4 


STD 


EXITZ 


STU 


XXXX1 


SRT 


0008 


NZU 




STU 


XXXX2 



EXITZ 



STORE 
STORE 
IS C5 
BLANK 
SAVE 



EXIT 
ADDR 



C5 



1213 
1919 

1464 
1333 
1437 



24 
21 
30 
44 
21 



1416 
1961 
0008 
143-7 
1962 



1919 
1464 
1333 
1416 

1665 



77 





RAU 


8002 






AUP 


90XXX 






BOV 


LOOP 


LOOP 


LOOP 


AUP 


HI 






BOV 




SYM 




SLT 


0002 






NZU 


LOOP 






RAL 


XXXX2 






SLO 


90XXX 






BMI 




SYM 




ALO 


29XXX 






BMI 


SYM 






RAL 


11 XXX 






AUP 


XXXX1 


AEX 


AEX 


ALO 


EXITZ 






SLO 


8002 


8001 


SYM 


RAU 


XXXX1 






LDD 




SUB15 




ALO 


2 1 XXX 






STU 


HSYMB 


AEX 


HI 


10 


0000 


0000 


HSYMB 


01 
HED 


0000 


HSYMB 



ARE LOW 4 


1665 


60 


8002 


1523 


CHARACTERS 


1523 


10 


1178 


1383 


NUMERIC 


1383 


47 


1286 


1286 




1286 


10 


1339 


1393 




1393 


47 


1396 


0998 




1396 


35 


0002 


1853 




1853 


44 


1286 


1658 


LOW 4 NUM 


1658 


65 


1962 


1417 


IS C5 


1417 


16 


1178 


1433 


ALPHABETIC 


1433 


46 


1336 


0998 




1336 


15 


1189 


1443 




1443 


46 


0998 


1447 


REGIONAL 


1447 


65 


0992 


1497 




1497 


10 


1961 


1715 




1715 


15 


1416 


1721 




1721 


16 


8002 


8001 


HED SYMBOL 


0998 


60 


1961 


1765 




1765 


69 


1018 


1663 


STEP EXIT 


1018 


15 


1771 


1425 




1425 


21 


1230 


1715 




1339 


10 


0000 


0000 


ERASEABLE 


1230 


01 


0000 


1230 



SUB 5 TEST ABSOLUTE ADDRESS 





HED 


5 
















SUBR5 


STD 


EXITZ 




STORE 


EXIT 


1750 


24 


1416 


1969 




STL 


XXXX1 




STORE 


A ' 


1969 


20 


1961 


1514 




SLT 


0004 








1514 


35 


0004 


1475 




SLO 


8002 








1475 


16 


8002 


1483 




TLU 


R0001 




TLU 




1483 


84 


1200 


1656 




ALO 


GET 


8002 


RANGE 




1656 


15 


1709 


8002 


8002 


RAU 


9972 


X 


TABLE 




8002 


60 


9972 


1177 


X " 


SLT 


0006 






- 


1177 


35 


0006 


1491 




SRT 


0006 








1491 


30 


0006 


1706 




AUP 


EXITZ 








1706 


10 


1416 


1821 




ALO 


XXXX1 








1821 


15 


1961 


1815 




SUP 


8003 


8001 






1815 


11 


8003 


8001 


GET 


RAU 


0000 


X 






1709 


60 


0000 


1177 


R0001 


00 


1999 


0000 


RANGE 




1200 


00 


1999 


0000 


R0002 


00 


7999 


0003 


TABLE 




1201 


00 


7999 


0003 


R0003 


00 


8003 


0001 






1202 


00 


8003 


0001 


R0004 


00 


8004 


0003 






1203 


00 


8004 


0003 


R0005 


00 


8007 


0001 






1204 


00 


8007 


0001 


R0006 


_ 00 


8999 


0003 






1205 


00 


8999 


0003 


R0007 


00 


9059 


0002 






1206 


00 


9059 


0002 


R0008 


99 
HED 


9999 


0003 






1207 


99 


9999 


0003 






SUB 6 SYMBOL TEST 


ROUTINE 














HED 


6 
















SUBR6 


STD 


EXITZ 




STORE 


EXIT 


1275 


24 


1416 


1320 




STU 


S 




STORE 


SYMB 


1320 


21 


1601 


1654 



78 





LDD 


SWOF 




SET SWITCH 


1654 


69 


1758 


1861 




STD 


SW 




OFF 


1861 


24 


1610 


1764 




MPY 


SC 




SCRAMBLE 


1764 


19 


1517 


1238 




RA'L 


8002 




SYMBOL 


1238 


65 


8002 


1547 




SLT 


0003 




GIVING 


1547 


35 


0003 


1806 




MPY 


CF 




LO 


1806 


19 


1759 


1330 




SRT 


0001 






1330 


30 


0001 


1587 




SLT 


0004 




SET 


1587 


35 


0004 


1597 





ALO 


L1P1 




TEST 


1597 


15 


1850 


1856 




STL 


L0P1 




WORD 


1856 


20 


1865 


1168 




SLO 


ID XXX 






1168 


16 


1020 


1525 




STL 


LO 


SLI 


SAVE LO 


1525 


20 


1903 


1487 


SLI 


STL 


LI 


8001 


INIT LI 


1487 


20 


1614 


8001 


8001 


RAL 


9990 


A 


IS CONT OF 


8001 


65 


9990 


1395 


A 


NZE 




UND 


LI ZERO 


1395 


45 


1098 


1549 




SLO 


S 




IS CONT OF 


1098 


16 


1601 


1756 




NZE 


SW 


DEF 


LI SYMB 


1756 


45 


1610 
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15 


1338 


8003 



84 



SRS 



8002 
8003 
TP 



PUN 



CI 
C2 
C3 
C4 

C5 
C6 
C7 

TW1 

TW2 

85 TH 

Al 

RSI 

AIM 

AMP1 



STL 
RAU 
ALO 
LDD 
STD 
SUP 
NZU 
AUP 
ALO 
PCH 
SLO 
NZE 
ALO 
STL 
RAL 
SLO 

STL 

STL 

00 

STD 
STD 

00 

00 
STL 
STD 

00 
LDD 

00 
LDD 
LDD 
HED 



XXXX2 

C4 

XXXX1 
9998 
9997 

TW2 

C5 
C6 

P0001 
AIM 

AMP1 

XXXX1 

XXXX2 

C7 

P0001 
P0009 

0500 
P0002 
P0010 

0001 

1499 
P0007 
P0008 

0080 
A0001 

0000 
A0200 
A0201 



8002 
8003 
TP 

PUN 

8002 

EXITX 

LOOP 

NEXT 

NEXT 
0500 

TP 

TP 
0000 
1499 

NEXT 

TP 
0000 
8003 
0450 
8003 
8003 



5AVE RS 


1528 


20 


1962 


1518 




1518 


60 


1424 


1879 




1879 


15 


1961 


8002 


STORE 


8002 


69 


9998 


8003 


AV TABLE 


8003 


24 


9997 


1752 




1752 


11 


1618 


1474 




1474 


44 


1427 


1578 




1427 


10 


1480 


1385 




1385 


15 


1388 


8002 




1578 


71 


1977 


1477 


IS AI MAX 


1477 


16 


1530 


1435 




1435 


45 


1438 


1196 


STEP AI 


1438 


15 


1342 


1248 




1248 


20 


1961 


1668 




1668 


65 


1962 


1718 




1718 


16 


1524 


1829 


CONSTANTS 


1382 


20 


1977 


1702 




1430 


20 


1985 


1702 




1338 


00 


0500 


0500 




1424 


24 


1978 


1752 




1480 


24 


1986 


1752 




1388 


00 


0001 


0000 




1524 


00 


1499 


1499 




1468 


20 


1983 


1702 




1618 


24 


1984 


1752 




1652 


00 


0080 


0000 




1292 


69 


0600 


8003 




1324 


00 


0000 


0450 




1530 


69 


0799 


8003 




1342 


69 


0800 


8003 



SUB 15 HEADING ROUTINE 



SUB15 



DH 



SUB16 



HED 
STD 
LDD 
SLT 
NZU 
RAU 
AUP 
RAU 
HED 



STD 
RAL 
STU 
STD 
LDD 
RAL 
AUP 
LDD 



H 
EXITY 

8003 

0008 
DH 

8001 
OOOOH 

8001 



EXITY 
EXITY 



SAVE EXIT 
IS CI 
BLANK 

HEAD 

DONT HEAD 



SUB 16 INITIALIZATION 



EXITY 
II 

P0009 
OOOOH 



12 
13 



SUBR1 



SUBR1 



1663 
1768 
1574 
1543 
1348 
1818 
1298 



24 
69 
35 
44 
60 
10 
60 



1813 
8003 
0008 
1298 
8001 
1329 
8001 



1768 
1574 
1543 
1348 
1818 
1813 
1813 



STORE EXIT 


1353 


24 


1813 


1868 




1868 


65 


1624 


1929 


ZERO CARD 


1929 


21 


1985 


1488 


ZERO HEAD 


1488 


24 


1329 


1432 


ZERO SYM T 


1432 


69 


1485 


1600 


MAKE DRUM 


1485 


65 


1538 


1593 


AVAILABLE 


1593 


10 


1546 


1802 




1802 


69 


1918 


1600 



85 



II 

12 
13 
14 
15 
PACOF 



SB17D 
SB17I 
DI 



SDA 



OD 
EV 
EO 



ADD1 



DEQ 
1EQ 
8002 
8003 



LDD 
STD 
LDD 
STD 
RAL 
AUP 
LDD 

00 
00 

11 

01 
00 

BD6 



HED 
LDD 
LDD 
STD 
STU 
STL 
LDD 
STL 
DIV 
N2U 
RAL 
RAL 
SLO 
NZE 
RAL 
RAL 
ALO 

00 
00 
00 
00 

HED 



H8XXX 

DRUMT 

14 

SWSYM 

15 

H8XXX 

EXITY 

S0001 

A0001 

1111 

0111 

1021 

FINDI 



SUBR1 

E0200 
A0200 

1111 
SYMOF 

1049 
FINDL 



SET DRUM 


1918 


69 


1406 


1968 


TAG TO 8 


1968 


24 


1212 


1674 


SET SWSYM 


1674 


69 


1527 


1580 


OFF 


1580 


24 


1664 


1724 


UNDEFINE 


1724 


65 


1577 


1631 


REGIONS 


1631 


10 


1406 


1774 




1774 


69 


1813 


1600 


CONSTANTS 


1624 


00 


0000 


0599 




1538 


00 


0600 


0799 




1546 


11 


1111 


1111 




1527 


01 


0111 


1218 




1577 


00 


1021 


1049 




1852 


96 


1824 


1874 



SUB 17 CALC 800X EQUIVALENT 



X 

DEO 

IEO 

XXXX1 

EXITY 

XXXX2 

XXXX1 

XXXX1 

2IXXX 

OD 

8002 

8003 

XXXX2 

XXXX1 
XXXX1 
II XXX 

0008 
0009 
0000 
0000 



DI 
DI 



SUB13 



EV 

EO 
EO 

ADD1 
EXITY 

EXITY 

SDA 

SDA 
8002 
8003 



D EQUIV 
I EQUIV 
SAVE TAG 
STORE EXIT 
STORE 800X 
GET OPTIM 
DYNAM ADDR 
IS DY ADDR 
EVEN OR OD 



CONSTANTS 



1902 

1854 

1627 

1526 

1576 

1626 

1904 

1676 

1482 

1535' 

1386 

1643 

1726 

1630 

1681 

1776. 

1924 
1974 
1588 
1789 



69 

69 
24 
21 
20 
69 
20 
14 
44 
65 
65 
16 
45 
65 
65 
15 



1924 
1974 
1961 
1813 
1962 
1961 
1961 
1771 
1535 
1588 
1789 
1962 
1630 
1961 
1961 
0992 



00 0008 

00 0009 

00 0000 

00 0000 



1627 
1627 
1526 
1576 
1626 
1964 
1676 
1482 
1386 
1643 
1643 
1726 
1681 
1813 
1776 
1813 

1904 
1904 
8002 
8003 



SUB 18 INDEX ADDRESS 



INDEX 



HED 


W 


STD 


EXITY 


STL 


XXXX1 


RAU 


1954 


SLT 


0007 


LDD 


EXITY 


BD5 


D 


SLT 


0002 


SRT 


0009 


MPY 


20001 


LDD 


EXITY 


BD6 


DS 



STORE EXIT 


1826 


24 


1813 


1876 


STORE ADDR 


1876 


20 


1961 


1926 




1926 


60 


1954 


1976 




1976 


35 


0007 


1693 




1693 


69 


1813 


1677 


D OR I 


1677 


95 


1680 


1532 




1532 


35 


0002 


1680 




1680 


30 


0009 


1727 




1727 


19 


1014 


1684 




1684 


69 


1813 


1777 


DRUM COR 


1777 


96 


1730 


1582 



86 





SRT 


0001 


DS 


CORE 


1582 


30 


0001 


1730 


DS 


ALO 


XXXX1 


EXITY 




1730 


15 


1961 


1813 


EXITY 


01 
HED 

REG 

REG 
REG 
REG 
REG 

HED 


0000 

SUB 19 

D0923 
G0925 
J0928 
K0931 
L0933 

A 


EXITY 

PROCESS 

0923 
0925 
0928 
0931 
0933 


ERASEABLE 

LOCATION 

PROC L 


1813 


01 


0000 


1813 


PROCL 


STD 


EXITX 




STORE EXIT 


0969 


24 


1196 


1899 




RAU 


1951 




IS L BLANK 


1899 


60 


1951 


1827 




NZU 


NB 






1827 


44 


1731 


1632 




LDD 


DRUMT 




BLANK TEST 


1632 


69 


1212 


1877 




BDO 


B 


D0002 


DRUM TAG 


1877 


90 


1781 


0924 


B 


RAL 


OPREG 


SETL 


BLANK 


1781 


65 


1872 


1927 


SETL 


SLT 


0004 




SET L 


1927 


35 


0004 


1987 




LDD 


P0008 




TO OR 


1987 


69 


1984 


1638 




SDA 


P0008 


EXITX 




1638 


22 


1984 


1196 


NB 


LDD 


G 


SUBR4 


WHAT IS L 


1731 


69 


1734 


1213 


G0001 


RAL 


1957 


KOOOl 


ABSOLUTE 


0925 


65 


1957 


0931 


G0002 


LDD 


K 


SUBR9 


REGIONAL 


0926 


69 


1780 


1174 


G0003 


LDD 


J 


SUBR6 


SYMBOLIC 


0927 


69 


1830 


1275 


KOOOl 


LDD 


L 


SUBR5 


TEST RANGE 


0931 


69 


1784 


1750 


K0OO2 


RAU 


87TH 


X 


REG ERROR 


0932 


60 


1585 


1839 


X 


AUP 


P0010 




SET BLANK 


1839 


10 


1986 


1392 




STU 


P0010 


SETL 


L8 


1392 


21 


1986 


1927 


LOOOl 


STL 


OPREG 


SETL 


DRUM ADDR 


0933 


20 


1872 


1927 


L0O02 


AUP 


86TH 


800X 


800X 


0934 


10 


1688 


1743 


L0003 


LDD 


ORCEQ 


89X 


CORE ADDR 


0935 


69 


1738 


1442 


L0004 


RAU 


87TH 


X 


OTHER 


0936 


60 


1585 


1839 


800X 


LDD 


ORXEQ 


89X 




1743 


69 


1596 


1442 


89X 


STD 


OPREG 


X 




1442 


24 


1872 


1839 


JOOOl 


RAL 


EQUIV 


KOOOl 


SYM DEFIND 


0928 


65 


1223 


0931 


.10002 


RAL 


D 


SUB11 


SYM UNDEF 


0929 


65 


1682 


1801 


J0003 


RAU 


87TH 


X 


S TAB FULL 


0930 


60 


1585 


1839 


D0001 


STL 


OPREG 


SS 


S EG FOUND 


0923 


20 


1872 


1628 


D0002 


RAU 


87TH 


X 


DRUM PAKED 


0924 


60 


1585 


1839 


ss 


AUP 


HSYMB 




STORE 


1628 


10 


1230 


1635 




ALO 


LSYMB 




SYMBOL 


1635 


15 


1575 


1880 




LDD 


B 


SUBR7 




1880 


69 


1781 


1279 


G 


00 


0000 


G0001 


CONSTANTS 


1734 


00 


0000 


0925 


K 


00 


0090 


KOOOl 




1780 


00 


0090 


0931 


J 


00 


0000 


JOOOl 




1830 


00 


0000 


0928 


L 


00 


0000 


LOOOl 




1784 


00 


0000 


0933 


D 


00 


0090 


D0001 




1682 


00 


0090 


0923 


86TH 


00 


0008 


0000 




1688 


00 


0008 


0000 


87TH 


00 


0000 


8000 




1585 


00 


0000 


8000 


EXITX 


01 


0000 


EXITX 


ERASEABLE 


1196 


01 


0000 


1196 



87 



HED 



SUB 20 PROCESS DATA ADDRESS 





REG 


D0937 


0937 




REG 


F0939 


0939 




REG 


G0941 


0941 




REG 


J0944 


0944 




REG 


K0 946 


0946 




REG 


L0949 


0949 




HED 


B 




PROCD 


STD 


EXITX 






RAU 


1952 






NZU 


NB 






RAL 


D 


SUB11 


D0001 


STL 


ORBAL 


L0004 


D0002 


RAU 


88TH 


X 


BT 


LDD 


OPTIM 






BD1 


EXITX 






STL 


OPREG 


EXITX 


X 


AUP 


P0010 






STU 


P0010 


EXITX 


NB 


LDD 


G 


SUBR4 


G0001 


RAL 


1958 


J0001 


G0002 


LDD 


J 


SUBR9 


G0003 


LDD 


K 


SUBR6 


J0001 


LDD 


L 


SUBR5 


J0002 


RAU 


88TH 


X 


L0001 


LDD 


AXD 


INDEX 


L0002 


SLT 


0004 


800X 


L0003 


LDD 


AXC 


INDEX 


L0004 


SLT 


0004 


SD 


800X 


LDD 


P0007 






SDA 


P0007 






SRT 


0004 






AUP 


XEQ 


SB17D 


SCD 


SLT 


0004 






LDD 


P0007 






SDA 


P0007 






SRT 


0004 






LDD 


CEO 


SUB13 


SCEQ 


STL 


ORCEQ 


BT 


K0001 


RAL 


EQUIV 


J0001 


K0002 


RAL 


F 


SUB11 


K0003 


RAU 


88TH 


X 


F0001 


STL 


EQ 


SS 


F0002 


RAU 


88TH 


X 


SS 


AUP 


HSYMB 






ALO 


LSYMB 






LDD 




SUBR7 




RAL 


EQ 


L0004 


SD 


LDD 


P0007 






SDA 


P0007 


■'"V 

■a 




SRT 


0004 


'BT 



PROC D 



STORE EXIT 


0972 


24 


1196 


1949 


IS D BLANK 


1949 


60 


1952 


1678 




1678 


44 


1831 


1732 


FIND 


1732 


65 


1685 


1801 


OPTIMUM D 


0937 


20 


1492 


0952 


DRUM PAKED 


0938 


60 


1542 


1398 


•IS OP 


1728 


69 


1452 


1778 


A BRANCH 


1778 


91 


1196 


1783 


D TO OR 


1783 


20 


1872 


1196 


SET BLANK 


1398 


10 


1986 


1592 




1592 


21 


1986 


1196 


WHAT IS D 


1831 


69 


1834 


1213 


ABSOLUTE 


0941 


65 


1958 


944 


REGIONAL 


0942 


69 


1645 


1174 


SYMBOLIC 


0943 


69 


1646 


1275 


TEST RANGE 


0944 


69 


1448 


1750 


REG ERROR 


0945 


60 


1542 


1398 


DRUM ADDR 


0949 


69 


1828 


1826 


800X 


0950 


35 


0004 


1878 


CORE ADDR 


0951 


69 


1928 


1826 


OTHER 


0952 


35 


0004 


1930 


SET 800X D 


1878 


69 


1983 


1436 




1436 


22 


1983 


1486 




1486 


30 


0004 


1498 


GET 800X E 


1498 


10 


1881 


1902 


SET CORE D 


1931 


35 


0004 


1642 




1642 


69 


1983 


1536 




1536 


22 


1983 


1586 




1586 


30 


0004 


1548 


GET CORE E 


1548 


69 


1782 


1964 


SAVE CORE 


1832 


20 


1738 


1728 


SYM DEFIND 


0946 


65 


1223 


0944 


SYM UNDEF 


0947 


65 


1882 


1801 


S TAB FULL 


0948 


60 


1542 


1398 


SAVE EQ 


0939 


20 


1793 


1696 


DRUM PAKED 


0940 


60 


1542 


1398 


STORE 


1696 


10 


1230 


1735 


SYMBOL 


1735 


15 


1575 


1932 




1932 


69 


1785 


1279 




1785 


65 


1793 


0952 


SET D ADDR 


1930 


69 


1983 


1636 




1636 


22 


1983 


1686 




1686 


30 


0004 


1728 



88 



D 


00 


0088 


DOOOl 


6 


00 


0000 


G0001 


J 


00 


0088 


JOOOl 


L 


00 


0000 


LOOOl 


F 


00 


0088 


FOOOl 


K 


00 


0000 


KOOOl 


AXD 


00 


0088 


DOOOl 


AXC 


00 


0098 


SCD 


XEQ 


STL 


ORXEQ 


BT 


CEQ 


00 


0008 


SCEQ 


88TH 


00 


0000 


0800 


EQ 


01 
HED 


0000 


EQ 






SUB 21 


PROCESS 




REG 


D0953 


0953 




REG 


F0955 


0955 




Rtu 


G0958 


0958 




REG 


J0960 


0960 




REG 


K0962 


0962 




REG 


L0965 


0965 




HED 


C 




PROCI 


STD 


EXITX 






RAU 


1953 






NZU 


NB 






RAU 


1952 






NZU 


DNB 






LDD 


DRUMT 






BDO 




G0002 




RAL 


ORBAL 


L0004 


DNB 


RAL 


D 


SUB11 


DOOOl 


STL 


ORBAL 


L0004 


D0002 


RAL 


P0010 


X 


X 


ALO 


89TH 






STL 


P0010 


EXITX 


NB 


LDD 


F 


SUBR4 


FOOOl 


RAL 


1959 


JOOOl 


F0002 


LDD 


J 


SUBR9 


F0003 


LDD 


K 


SUBR6 


JOOOl 


LDD 


L 


SUBR5 


J0002 


RAL 


P0010 


X 


LOOOl 


LDD 


AXD 


INDEX 


L0002 


LDD 


P0007 


800X 


L0003 


LDD 


AXC 


INDEX 


L0004 


LDD 


P0007 






SIA 


P0007 


MOR 


800X 


SIA 


P0007 






AUP 


XEQ 


SB17I 


90XX 


LDD 


P0007 






SIA 


P0007 






LDD 


CEQ 


SUB13 


KOOOl 


RAL 


EQUIV 


JOOOl 



CONSTANTS - 


1685 


00 


0088 


0937 




1834 


00 


0000 


0941 




1645 


00 


0088 


944 




1448 


00 


0000 


949 




1882 


00 


0088 


0939 




1646 


00 


0000 


0946 




1828 


00 


0088 


0937 




1928 


00 


0098 


1931 




1881 


20 


1596 


1728 




1782 


00 


0008 


1832 




1542 


00 


0000 


0800 


ERASEABLE 


1793 


01 


0000 


1793 



PROC I 



STORE EXIT 


1453 


24 


1196 


1833 


IS I BLANK 


1833 


60 


1953 


1883 




1883 


44 


1788 


1838 


IS D BLANK 


1838 


60 


1952 


1933 




1933 


44 


1888 


1938 


D I BLANK 


1938 


69 


1212 


1884 


TEST DRUM 


1884 


90 


1988 


0959 


TAG 


1988 


65 


1492 


0968 


FIND BEST 


1888 


65 


1692 


1801 


FOUND 


0953 


20 


1492 


0968 


DRUM PAKED 


0954 


65 


1986 


1742 




1742 


15 


1695 


1934 




1934 


20 


1986 


1196 


WHAT IS I 


1788 


69 


1792 


1213 


ABSOLUTE 


0955 


65 


1959 


0960 


REGIONAL 


0956 


69 


1835 


1174 


SYMBOLIC 


0957 


69 


1885 


1275 


TEST RANGE 


0960 


69 


1935 


1750 


REG ERROR 


0961 


65 


1986 


1742 


DRUM ADDR 


0965 


69 


1736 


1826 


800X 


0966 


69 


1983 


1786 


CORE ADDR 


0967 


69 


1836 


1826 


OTHER 


0968 


69 


1983 


1886 




1886 


23 


1983 


1936 




1786 


23 


1983 


1889 


GET 800X E 


1889 


10 


1842 


1854 


SET CORE 


1939 


69 


1983 


1989 


ADDRESS 


1989 


23 


1983 


1440 


GET CORE E 


1440 


69 


1843 


1964 


SYM DEFIND 


0962 


65 


1223 


0960 



89 



K0002 


RAL 


G 


SUB11 


SYM UNDEF 


0963 


65 


1490 


1801 


K0003 


RAL 


P0010 


X 


S TAB FULL 


0964 


65 


1986 


1742 


G0001 


LDD 


P0007 


SI 


FOUND BEST 


0958 


69 


1983 


1540 


60002 


RAL 


P0010 


X 


DRUM PAKED 


0959 


65 


1986 


1742 


SI 


SIA 


P0007 






1540 


23 


1983 


1590 




AUP 


HSYMB 




STORE 


1590 


10 


1230 


1640 




ALO 


LSYMB 




SYMBOL 


1640 


15 


1575 


1690 




LDD 


MOR 


SUBR7 




1690 


69 


1936 


1279 


MOR 


LDD 


ORBAL 




SET OR 


1936 


69 


1492 


1745 




STD 


OPREG 


EXITX 


TO ORB 


1745 


24 


1872 


1196 


SCEO 


STL 


ORCEQ 


MOR 


SAVE CORE 


1740 


20 


1738 


1936 


D 


00 


0089 


D0001 


CONSTANTS 


1692 


00 


0089 


0953 


F 


00 


0000 


F0001 




1792 


00 


0000 


0955 


J 


00 


0089 


J0001 




1835 


00 


0089 


0960 


K 


00 


0000 


K0001 




1885 


00 


0000 


0962 


L 


00 


0000 


L0001 




1935 


00 


0000 


0965 


G 


00 


0089 


G0001 




1490 


00 


0089 


0958 


89TH 


00 


0000 


0080 




1695 


00 


0000 


0080 


AXD 


00 


0089 


L0004 




1736 


00 


0089 


0968 


AXC 


00 


0099 


90XX 




1836 


00 


0099 


1939 


XEQ 


STL 


ORXEQ 


MOR 




1842 


20 


1596 


1936 


CEQ 


00 

HED 


0009 


SCEQ 




1843 


00 


0009 


1740 


1IXXX 


00 


0000 


0001 


CONSTANTS 


0992 


00 


0000 


0001 


1DXXX 


00 


0001 


0000 




1020 


00 


0001 


0000 


2IXXX 


00 


0000 


0002 




1771 


00 


0000 


0002 


2DXXX 


00 


0002 


0000 




1288 


00 


0002 


0000 


H8XXX 


80 


0000 


0000 




1406 


80 


0000 


0000 


H9XXX 


90 


0000 


0000 




1216 


90 


0000 


0000 


90XXX 


00 


0000 


0090 




1178 


00 


0000 


0090 


29XXX 


00 


0000 


0029 




1189 


00 


0000 


0029 


20001 


00 


0000 


2000 


CONSTANT 


1014 


00 


0000 


2000 


TORG 


00 


0000 


T0001 




0990 


00 


0000 


1990 



PAT 



90 



mirvir>tnir\ir\iriintnm^»o<jo»0'00so vo o «© r- f-r~ r«- r- r-r-r-r^-r-cocoooaD cococooococoooo o»cm> oooo^ 
ooooooooooooooooooooo oooo ooooooooooooooooooooooooo 

i-trHf-HrHr-trHr-4i-»iHt-li-(M<-««HrHr-<f-( i-HtHiHrH Hr- I H H rlriHHHHr I H pi HHHHr I H H H rl H r( H cH r-( rH «— » 



O O O 

o o o 
o oo 
o o o 
o o o 
o oo 
o o o 
o o o 
o o o 
o o o 



o oo 
o oo 
o oo 
o oo 
o o o 
o o o 
o oo 
o o o 
o o o 
o o o 



o o 
o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 
o o 

O O 

o o 
o o 
o o 

oo 
o o 

oo 
o o 



oooo 
o oo o 

o o oo 

o o o o 
o oo o 
o o o o 
o o o o 

o o o o 
o o oo 
o o o o 



o o o 
oo o 

oo o 
o o o 
oo o 
oo o 
o o o 
o o o 
oo o 
o o o 



o o 
o o 

oo 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 

o o 
o o 

oo 
oo 
oo 

oo 
o o 
o o 
o o 



oo o o 
oo o o 

oo o o 
oooo 
oo o o 
oo o o 
oo o o 
oo o o 
oo o o 
oo o o 



oo 

o o 

oo 
oo 

o o 
oo 

oo 
o o 
o o 
o o 



o o o 

o o o 
o oo 
o oo 
o oo 
o oo 
o oo 

O O O 
O OO 
O O O 



o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 
o o 

oo 
o o 
o o 
o o 

o o 
o o 
o o 
o o 



o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



oo 
o o 
oo 
o o 
oo 
o o 
o o 
o o 
o o 
o o 



o o o 

OOH 

OOH 
OOH 
O OH 

o o_o 
oo o 

o o o 
o o o 

o o o 



O O r-» 

Ohh 
O h H 

O O o 
O o o 
o o o 
ooo 
o o o 
ooo 
o o o 



H O 
rH O 
rH O 

o o 

o o 



oo o 

OH O 

Oho 
Oho 

H O 
H O 

Oh O 
Oh O 

Oho 

o o o 



8: 



OHNm^invOMoo^ OHN(0-t««oh-a30vOH(MM<f invOh-ooo^OHMm <f <r» \0 i— co o oh n c^-* in vo r- co o 

OOOOOOOOOOHHHHHHHHHHMNNNNNNNN(\J(<l(Omm(n(<\(fl(Cim(<\v(-<t-^4'4't^<( , '*'!t 

inintnintf^inu^ir*u^u^inir\<r\inininintriir\inintf^inin^intf>»n 

r-it-fr-tr-tt-ir-ir-it-ir-tr-ir-tr-iw-tf-ir-it-tr-* HHHrH r-i r-i rHrH HHt-H«-HHi— IrHrHrHHHrHiHHHrHHf-HrHi— 1«— I HHHH 

OHNm-tm*MOO OHCMcn-4-iT\\0 t-00 O O HCNJ C^l-tf- in vO N CD 0> OHCVjm >t in >0 r~ 00 C> OHM ca -4- m vor-coa* 

iniftir\triiAifiu>inifMA\OiO\o^^NO»o»o*o>or*- r— I s - i*~ r- f*-r"-t , --t , -r'-aooococo cooooocooocooooooo oooo 

r-» H H H H H i— (i— (rHHrHi-irHrHHi— IrH H H t-H r- 1 i— IH H H HHHHHHHHH HHHi— Ir— IrHHHHHt— I H ri H rl H 



o o o 
o o o 
o o o 
o o o 
o o o 
o o o 
o o o 
o o o 
o o o 
ooo 



o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o o o 
o o o o 
oooo 
o o o c 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
o o o o 
o o O O 
O O O O 



O O O O 
OO O o 

oo o o 
o o o o 
oo o o 
oo o o 
o o o o 
oo o o 
oo o o 
oo o o 



oo 
oo 
oo 
oo 
oo 
o o 
oo 
oo 
oo 
oo 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o 
o o 
o o 

o o 
o o 
o o 

o o 
o o 
o o 
o o 



o o 

o o 
o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 
o o 

o o 
o o 
o o 
o o 
o o 
oo 
o o 
o o 



ooo 

ooo 
o o O 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o o o 

o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 
o o o o 



OHC\i<n<t-ir>sor~cooN 

OOOOOOOOOOH 

eoooooooooo 



OHNm<|•lr\^o^coc^OH^l(f>^}■ln^o^oo{^oH^lcf|^fln^o^■coc^OHc^l(^1^^|^^D^•co(^ 
HHrH<-HHHf-i>-Hr-Hc-H(\i <N(\jcmcm CMCMrvjc\ic\jrncnrnc^roco<^cn^cn-4-<t - <t'<i-<J-vi-<j-vl-<h<fr 

:>ooooooooooooooooooooooooooooooooooooooo 

IHHrMHi— IHHHHrH HH rl H rHiH«Ht-Ht— li-HHrHi— IrHrHrHrHrHrHf— IrHrHHrHt— (HrHrHrH 



OHNm4^o^o^coo^OHN^^^ln^c^coc^oH(^^co<fli^^o^coc^oHt^J( f »•*tn»o^coc^oHC^JM^l•l^l^o^oo(^ 
inminininmifliAininvflvOvo^^vOvo sOvOvOr- f-r-r-r- r-r-r-r^r-cooococo cooococococoooo ^ oca ooo ^ 
ooooooooooooooooooooo oooo ooooooooooooooooooooooooo 
ocoooooooooooooooooooooooooooooooooooooooooooooooo 



ooo 
ooo 

ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



o o 

o o 

o o 

o o 



o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



oooo 
oooo 

oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 



oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 
oooo 



oo 
oo 
o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



oooo 
oooo 

OOOO 

OOOO 

OOOO 

oooo 
oooo 
oooo 
oooo 
oooo 



o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



oooo 
oooo 
oooo 

oooo 
oooo 

oooo 
oooo 
oooo 
oooo 
oooo 



ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 
ooo 



o o 
o o 

o o 
o o 
o o 
o o 



o o 

o o 

o o 

o o 



o o 
o o 

o o 
o o 
o o 
o o 
o o 
o o 
o o 
o o 



OH^g(^1■4■lfl^o^coooHNf(^^t■lAv0^coooHr^l^<t■li^^o^coooH(^lfnsl■lA^o^coooHN(<l<|■ln^o^ooo 
oooooooooOHHHHi-HHr-ir-ir-iHc\j c\K\j(Njc\i c\i<NJc\i(NJCM<^rnrocncncnrncococn<r<f--4"-d-<t--4-<t<t'<J _ -4- 
ix\iniriininininininininininininiriiriiriif>iftix\ minmin ir\inir\ininir^inir^inuA^if>i^u^u^ininLniriLninLninir\ir\ 
ooooooooooooooooooooo oo oo ooooooooo oooooooooooooooo 



o h n ci <i- in *o h co o OH(\im<t-irivONcooo H(\i co <r LrivOJ^-coooHCM^^l-tn^Of^-coooHrvjco^j-Lnvor-coo 
mintnmiTiinmmminvOvO^OvOvOvOvo «£> vo so f- r-- r~ r- h- ( s -r-r-f v -r~cocoooco cocooocooocooooo oo oooo 

ooooooooooooooooooooo ooooooooooooooooooooooo oooooo 



o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


coo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 


o 


ooo 


oooo 


o o 


o 


ooo 


o o 


o 


o 


o 


o o 


oo 


o o 


o o 


oooo 


o 


o o 


o 


oooooo 


o 


o 


o 


o 


o 


o 


o o 


o 



CHNm<tin>0hC0OOH(\im<|-injDhC0OOHMn<t'mv0r-C0OOHNn4 , inv0MI3OOHN(n4 , lAOM»O 

oooooooooOHHHHHr-irHHHHtM tN csj c\ic\j c\jc\jcMCNi<Mcoc<irncn<ncnrncnrnrn<i-<|-<j-<f <h <j- <j- -4- <t- <j- 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
ooooooooooooooooooooo OO OO OOOOOOOOO OOOOOOOOOOOO oooo 



91 



in 
in 


t- ©H W 

<* •* •* O 
poo o 

O O O 00 


m 
On 

H 


. * «n * CM 

go o O 
oo o o 




Minnow 
(si «o i-i <o: 



§o o (j «> o% p. 
o o< On on o> 

CO O r* «-t H H 

co m on cm m m 

in fr m ^ m n 
Ch o> oo o o 
•H M oo o o 

On O •* •* * sf 
«0 r- <M CM CM CM 



r~ c (mm m o 

^ On © o O O 

H H OO O O 

* 0>*<Ch O 

o> amtfioo 

On (hCOOO 
HrtOOjJO 



rn <o co oo oo oo 

m m On On C» CTi 

On On On O On On 



■t NOHI>.<f 

in m co en cm co 

0< On O O O O 

H H O o o o 



no m o <-< f- cm 

in in en ro rvi o 

On On O O O O 

h >-4 o o o oo 

Ifl (B HH(f| ri 

in On O O CM O 

On On O O O O 

i-i HOioom 



■* I-- h" r- f- h- 

m lO O On On On 
On On On On On On 



m oo oo m o m 

On in -4- CM CM * 

On 0n o o o o 

H H © O O O 



K\CMO«04 , 4 , lflOv(<\OOmift00 1 HMri(<>(H(Njmo 0|f | 0l j , N( |, 

OONOOOOOOONOOoooOi-ir-mcooNCNjONfomomNOcommiH 
mOmino*4 , (nciinooiriinoin(fioNinNN4 0N(OooNONO>ONON o 

©0N©©©OO©C_N©OOOOOHHHHHHHHHOHHr-.HHH 



O0N + omnw 
O On in o co co m 



)iM<ioo*tmoifl(Mnooino^ONOO>ooinino> 

)(M<100NttilOH>OONON>ON*«OifiNO(N]iO<ONO 



(OONON(iooNM[ooo^ONONoo(oeoH(<i,inONOi»oDONNOi-iininr-(iMnH 

CM)NONONONONi7»0>ONONONONONONN|»-H(<linONONm*tOHinON^tf\ON 

c^c^ONONONONONO^o^o^c^oococ^CMCNJC^co^^^oc<^p^^-l^l^>cooNCMrfl<J-ON 

©0N©O©©OOOOO©©OHHOHHHHHHHr-«HOHHHO 



iftONOif|i0.tiftlfl4 , <tOOOiflCOCMMn4'NN<f>Omr-(NJ004HN 

ooxNiONOoooooooooHinooo^^oiofflininovooHo 
irNftN-imh-^f-inirjininoooinomONinr^ininooNONONONONNO^t-mo 

CM©0©000©OOOHHHHHHOHHHHOOHHO 



OOn _ 

m On rH in 

OO N Oi 

OONcoocfN.roo-t-tnwoooi'oommoON oommoNinONO-*o>oo 

oon moncim + ciw 6oo^mHio<o4)4)<im<o<cii04H(Ni«4)m 

D)0N0NR)0N0NC0(00N0N0N(000C0!<\mrt(00NNON0O>00N4'W(t\W0N o 

ONO^o^c^c^^^ONONONO>ONONO> , o<-iONCNjc<iinincM^j-(M^-rH<j-rsin<> © 

ONONONO^ONONOO^^^COCOONCMO^NOODONh-OOinOOONCMCMONCOONO 
00000©0©00000©HHHHHOHHHH«-IHH©HOCM 

i*O-it*OOOW00ON0NinrNJt0(»(flv0N0H0NOOOO 

^__. wv .-wo©oooo©oino CD ^ m ^'*<MracN.rK_.fj._'.iri-ri--N 
mminmh-o^-omLnooomONO^- .-« -«. -■-■...-. v.-. w«« v-> 

_-.-,_-._„. v-._._^_._ —._-.-_._ . __ iHHr.H«-«HHi".Hf(©HH© 



lfl*<tinvDO*C5-it<i-OOOiri030NOCNJlfl(NjoOai(<N,NONOiHONOOOO 

oooocMOoooooooomooor-cooN-tcMcotN-iONNOcoomNO© 
mminmh- e 4- ©mm ooomcso(MOifiNt<to , o>h'H(j>HOO»'* o 

©©OOCMOOOOO©©©©HOHHHHHHHHHHH©HH© 

pm(f\.jtm(0(fiownooo^moifioooO'Oio>o<^HifloONO>o 
oiflm<tm«imo(<>wooorfiNoo>0(Njvoc>jvONONONOtNjNHo>DNOo 



MvOH^KiONvONN-j-NONOiftHiOh-inooN 
mo><fHMHina3i^ ooccocnioocm©!— 
oooooor-o ©ooooooom oo> 

OOOOOOhooho©OOHOhC0O 

CnOHIftNOOHNrtM»\I<l<<>4-inHOffl4 

NOONNp<X)NOCOOvOONNph-COCOCOr--«OCN(f > -r-l 

("••♦•TONCNjh-MOHnintNKnmwaDmoONo 
co«oh-»ooor-r-iNONO«ooo«ot~eoeoo6t-«Oi-« 

HtNJN-*«0<K>ONOvONONWlNJfM(Nl>ONOOO 

«o«ONO«©vor--i-ii»-r-f--r--oooocococor-*.-t.-i 

tMincMf— onoocoo o<oon mooONr-tn om 
mo>om<no.4-cor--r-comr-icMtnr~oi~-<-< 
oooooooo ooooooooo-om 

OOrHOOOOO OOOOOOOOCOH,-* 
CMinoN(T)i^.tNjt<N. r H<|-corfi<(-ot«<cn(00 , 0<M 

NflONr-(OI>-NOlONO'OONNONOM V NOON(NJHNO 

f^*COiN'*ONONHcn*CMNOcn__l'-aNO<f , ON 

oo«or--cor-NOco>o«0'NOcDcoi s -eoooc~-rMr-( < -< 

rHrNjrNjfNg»OffN,moNO'ONONO'CMCMCMNOm-ftcM 
«o>ONO«0vOf-r*-i*-f'--r-h-r'~-coeoc0oOr-tcMCNj 

©•*C<">r-*ON<\IHCMCnC«.*C00NCO._-HHH 

moio<fi<io<thH(N.ii)o(Ni(NiiniN-iOHH 
oooooooo ©oaoooooco-3-co 

OOHOOOOOHOOOOOOOHH-r. 

i-n>t-MininoNiM00ON(MCMmcMONCMrMr-t»-i-i 

NO^vOOOCONOlOlOlN-ONvOSNONONOOMfllftO 

f^-itcoNOvf-^-ONcocM^cMcciONCor-ONONONo 

00«Oh-r~«ONO00»ONONO00CONO0000r-rHrH00 

HN(Nj(Nj*^inh-ONONON(MNjfNi(Nj>ooinin 

NO«NONONOh'( > -h-h'M^f-CO<D00IDvOvOH 

CN4 I ^iHo>inooincMr~^t - ONrfr-ONrHoocfi.NOf-<r v -o>ocooO'Hc r icn-4 , rHrHrHON(n 

N0NOl f lhf*-N4'C0OKIOOlfl^OH0N(NJOW*<t , ON0|N-(00N' v 'lfir-i0h'<D 

CN-rHODcorNjoocMi^oNinoNOJi-m^-ooooooooooooooooocMONrt 

HHHHHHHHOrHOOHHHOOOOHOOOHOOOOOOOOHOH 

ONNOCNJln*<^tn^o*©ln©cMNO>OI-^^-tfN.lnr-<^<^-^^^^l<l■^Hr-^f^lr-^4•^^r-^^--f-lcM 

rHOOOOOO<J-0000000 O CD Omi-(C0Ot^0Nh-M^v0'O100[)0>vON0«i0N0(MriO03 

moNNomvooooovON ©on oo>NOvo + *o»>OH4o>HH^N(<i(Mor-o>o>Ori 

HHHHH©HHM©H©HHH©C»NONOh-NONOCON0NO\OCDC0NOC0C0r-"HCOH 

Oinif\0(MflCMflriOlflOOO>lflOHNNMO! l linhOvff>tMMNJl\|MJOO>0 
CM^vONOvOrOvOvOCNJ©vOOvONONOONONONONONOf>-l~-h-( s -(---h-r--00000000>0<-l^- 

ONO^oocooof~cnrHi^fNj^NO<friHco(^^t^inc^ON^r~CNj^vocMr^in^r^NOCAinf»-0'-Hr s -»-<r^o 

ONO>o>ONOtf\ooN(<iNtNNr-oNooooNiOin(NiinHONO>*i<vo(\i'JiO(»( , -ONciHcoo<oo> 

(MMMMiiaiOHOntHIOHiBMHNOOhmN + OOOOOOOOOOOOOOOOO^O 

OOOOH©00HOHHHHHHHHHHHHHOOOOOOOO©OOOOOOOOHO 

oin>oiftwoo>0[ f iooinfflinooNONO*H>oifiOMNO>oi<i'mN4'<fN!OHmKN,MNjoN4o 
OoooinoOco<Mw^cMc<iONtHcoincoNooi~inr^^o^>ONOcococOi^«)coNOODooh-cooNooo 

oir>voinNOOOON(Njr->o<oi)0'i('if\HONONON.tON(^-*<f.4-j'H«ifioNH^f--winoN4-40NONO 

OO©OHOOHHHHHHHHHHHHHOHf--N0--r*-N0l"-0000N0N0C'-C0N0r'-00N0C'NHO 

ooowinooui^ONONON(Mflo>o(Mnoo ( ooNriNNtNiNt)ooinififf>CMMMNi!N)(NjiooNO>o 

OOOClNOOO*vOJ)NOiO>OiO**vOHO'OvO'C'e>OiOvONO>6l>-M > -hhSa5(Oi»tOOiiOO 

coONC^ONON03oococooNONO^aD(_>»ma*mm.o<f_D©oc*mco©cor'-chm 

0>0>0N0Nff'(0ff'0'0N0N0Ntt'0i0>ChN>0Hl , "4tf0<^*0N>0O0NtI)OONrtffi0><tOOO4'£INrl\0(0l<>OOOM0N 
On On On On On On On 0)0>^0N<)i0N0<0NrH(M>(Nj^tM'1(MMD(<lN0>0Mn'4'NtOOOOOOOOOOOOOO0OON4 
OOOOOOOOOOOOOOOHOOHHOhQOhhhhohhhOOOOhhOOOOhOoOOOOOHh 

.* CM * CO CM 

OH O O o 

•<t CM U. CO CM _. ,. -_ _. 

OHOOOOOOO ______ _ , __.. , _., __ -..-..-_, w .. w 

©e<.co*cooen©ocN.oooco*ooNmoNomomm*c*^©om^mHCMCMCMmco_.mc^ 

OrtmmtnowoowoooM4w*^o^OH<)^o*o^l*-lON^Ol_H^o^O'()_^o>o^■^^•^^^eo»HCO(DNl. 

lfll^h-0N0Nh-Of~Ol v W'.t0<K^KiriO(0NC00N<t->DCl>0 
Mfiff'NtOOUlO^Ov^NOPllI.lllOlNH-CNHOilOinh-f- 
IM<llM.(i\(OI.OOOOOOONtOOOOOO«)000'H 

©HOHHHHHOOOOOOHOOHOOOHOOOH 

©4-(NJ > ONOCMONNO»OI^CMON.*N_)C<><OCMC<.-+--l?n<|--(h-4'CNJO 

omoNONOinh-voi^.oNNOf--t^-Nou.NOONr~-r*-Noi~ooor-h-o 
ooNONri<.ONON(o<i-4'tin(NjinoN HcnincM.tf-'tf-oencnHO 
Ot-iorH--i-Hr-(f^NO.Nor-cocONOi-iNO>ovoooNOh-or~oo ho 

HON tfy <f On lfi^HfN|f.CN14>OlfloONC'iONONNNint>liOiOH 

ONOHf.<ONOf.iO\o>o<ONOiOh-NOiN-r<-hi v (oi»<.cooo4-o 



coCNONONOOONCOooooo.o.coo_cor.in 

ONQNONflNO-fflONONONONONONONONOin 
ONONONONfi0ONON0000ONON00ONONON<t- 

©OOOOOOOOOOOOOOH 

in-* •* en ono ■* © © * oo-'iri oh 
OOOOOCMOOOO ooooom 
in_.mc<.©r-in©o_.oo-0in©o> 

©OOOOCMOOOOOOOOOH 

Oc\mmO(fimoonooo(«Hin 
Oitrnmom . © O en ooorn onO 



OnOnOnOnQOOnOOOOOOOn 
ON 0> On CM. On ON 0> On On 
On 0> On On On On On .00 00 On 
OOOOOOOOOO 

CMCM-*<n.©nO_.©©* 
CMOOOOCMOOOO 

cf.cMincN.or-* oom 

CMOOOOCMOOOO 
CC.fN.m*Ocfl*-OOcO 

mwminommooii. 



H*C>lONOOO-OOC^ONONC01DO)tOONONONON0300('iHifl<thOOHrNlf.vO 

-.inONC.OOOONONONONONOOONONONONONONONONONHONr^t~-CMONO-**00 

c^ONONooooON^ONChc^ONONONONONONONONONONcnHfN.HONCooor~-r«-oo 

r-»HONOOOOOOOOOOOOOOONOOOOOHHHHHHHHHr. 

cMi^co^^inH*inocnr.O'*'*inoNOONO_.inoNNOCMocMCNiCMvONOcri 
inin^-osj-^-oooHOHOooooNOOooomooc-oot^jfoooooooo 
ONONOoooo*inHCN,tMO-4-*inoNOoinin«noNON<<N,r»-ooinoooNONON 

HHOOOOOOOHOHOOOOONOOOOOHHHHt-tHHHHH 

on ONoifio-tooorAiflifiowmooN oocncnroinmoNONOomininoN 

OOMriH*OOOfA4l f iOCimOfAOOf.f.C'l<IO>Oi{iC.iONOiOit)>0 



CO CMnOnOnOvO OM~M v NM'-M s, (N-h-NhhNh-M^ 

inmo»ONONONooooooooooooooooooo 

OnOnOnOnOnOnOOOOOOOOOOOOOOOOOOO 
hhhhhhOOOOOOOOOOOOOOOOOOO 

cMr-or-OHcnor-*Hoom<MON«ocoor-*HOOincMON 
m ONONt + 4 , c-ooHf.(Nj(ci<t*irnof-|N.»ONONOHH 

ON OnOOOOOOOOOCOOOOOOOOOOOOOOOOOCOOOOOCOOnOnOn 
HHOOOOOOOOOOOOOOOOOOOOOOO 

wQOOQOOOOOOOOOOOOOOOOOOOO 
»0 CMCMCMCMCMCMOOOOOOOOOO OOOOOOOO 



h- r-- r— f*- r*~ i*— 

O O O O O o 
O O O O o o 
© O O O O O 

omoNvtH 
cm co -4- •* m «o 

On On On On On On 
O © O O O O 



OOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOO 

ooincMONNOcooh-or^-4'HooinrMONNOcoof---*HaoincMON«o 

*h»(0 0>OHHifiifi*NI , -(J0 0N0>OHCNlN(C|*4-if\<0(0f- 
OnOnOnO>0>OOOOOOOOOOOHhhhhhhhhmh 

O OOOOHtHH«HHHrHHl-tr-IHHHHHH«-.HHi-_t-.H 

OOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOO 



Overpuncb Y(12) in columns 2, 10, 20 80 



92 




OHOOriHHHHON 

S2iS5t2^^5 ^ l0mH,ri ^ rvl!0|NO,0,i0r ~ ol ^ 0vrti:0vON OHr~o4<tONO<J>OOChHcoo<l-mr<jto 
S2SS? v S2 OOONHh " ,f,0,> "0 ,0iniritNll! >o v|> - fflHa 'oDco(»«oo>OfflH^oooinoo(»J)inir\Nooo 

2SS2J ,0 229 l ; rif ~ 0Mr ' o ' ri(>m0 '* !!,H N(M3>NO4C10>^OO44^HOO<f0M<lNO(f40»-d-0>OO 

OOC0OOrHOC0OOCgi-HO^H03rHa,i-I^HrH 1 -H r-LcijH ■~<'-IOr-(r-lr-lrHOC0 < -Hr-lr-lrHOOO'-lrH^O^H'-lrHr-< r HOra 

OOOOI^l[^JO^0(^IM(^ri^HH^^I^^^0^0OH<f^M>0O^fHNt^^C0r^HH^0HOtll^0r^5)C0OH^0*^0M(^l^CI 



(> HiOsfmo 

HHHHrICO 

O LO vO o o o 
<-t O (M o o o 

H .-I i-H O CO O 



^S^S2 ^ M ^ OM00 ^^ 00 ™ M ^^^^™^o^^^™^^^™ m ^^<f^-rMc^voc>vOvOrH,-i^ 

S£2S2^^^^? NH * N0 ' moO ^ oro °O^ roHNW **^^ ffl ^^^^C r ' ( » H O0DC0mNH>0O0>03^HOO<f(>N^ 

iS2i2 NNH ^^ H ^ ^ ww **^^ N oo>0(^<r^^•^^lm(Alr^vl)•4■lAlnc^o^4HON^^!<l^f(<lmlno<^h^^^lflC^m^ltl 

HOOOOHrirlriONH(^HHriOO^HHtO(»rlOHHHHHriHHHHOriH^lHHrirtHrirtriHH^^OHririOriHH 

X22™222°** fflfflo *^*^^ H HM 0^^ w ^OHiri>OxOinto^vOmNHvi-mNin<fto^cooch<)-o<i-mHCO^<fj- 
222SS22^2 0ri ^ OHm ^ 00,000|,1 ° lf|, " inHI<1 o (Ji(0l0i0i0t " !<1 '*^' ,lH coot , ioNHinoos((iooooio^^o 

22S22 O ^^^°^ mN ^*^^ onw *^^*^ ON0NC ' ,0:liriv0t0t00,Nn , OinowC0(7iH<l->0vDOO(>(>rri^o 

OOC0r-lOOOi-)OOi-<r-(Or-lrtr-ia.a-r~rHC0r-IOi-<rHrH r-1 r-1 Oi-lr-t^ ) -lrHM^rHOrHr-lrHC0i-HOr-t^^OrH^IOOC0Or4Oi-IO 

222f,2^^^ 0000400 *^ w ^ iniri(J ' in,cf,0in OiA.tOiftiA>flOiv0^iriOO>0-0<fOI<l^iA00^00^4ifliA4ir\ 
mOOW^OOiOmHCOHOMHriHOilXliO^HiOOMH-OHtiKtHHHstH^iOvOIM^NH^mNMiOHO^O^riNvOvONm 



n 25? , ? h, ? 0,0vNH,0 Or-t<t- ©in OHin^N + rtCOvOit^CO HOOvONHO^»M^O>Mi1m>OHinMB O.-([\IOOOOC0-i- 

in^c\iin<frHOinco^voco^cncoc>vOC>inrNj<j-o.*r\icor^*o<tfnooinc^ 

NrtriHHHtOHOHHriHriHOHOHriHOJriHririHriHriHHHHririHririHlDHHCOOOIDHri 

£2?^^?^ WN * OOHCOOIflc()<fH oi v ftirifflin(OtOvomoo<f<foift(<io>owo^H^invOH(ii(Do>o^^ooHm<i- 
coocMlOJ^•lnooNrioooIOOlno■-loo3moo^^Olnln^aolflm^l3fJfla3oo<^»10NoM'^ooo^(^H(^(^oo^rao 

^O2^aa*OOM^O<fv0N(flv00>Oi0(<imOO0>lA0>0vNOi00ilNI<lN<|-O4i-l^O4O( r 1^0»IJ>OHhJ)0^aiOOh-iriO 
HOr-HriOHOHNriOriririOriinHriririOKIriHHHHfflHHriHririfflOHriOriariHriOCOHOriOiOOOHriO 

woo<flnolfto^oooHt^o4C^oo^OH^l•ooo^f>Blnl^l^^lnolnlIl^^(^c^o^<t(^lrl<|■^•^tolnNHO(^4HtrllrlOln^|■c 

WOOCM«OHHtO^ONO l OHHvONff>HWHH(f|vDlNHHH<|-%OH^|H'X)NOvOvONiOv04*(MNHNHH>ONOJH40H4(<l 

^o^o^m!n^((l(^HvO(^^N<t■4moN^^^o^^tO(^(^(A^l^|■((lo^lntf|^lH(0Ho^OH[^lH^llflOH^4■^o(B(^llnc^!^^o 
o(^ooooLn<l•(^OHH^lIfloo(llrioOv()MH(^ricoH{Olcoo•J■lrl4^tf^ln((ls|■oo>ONl»lnowHOlM!BS)oo^^o>Ol0^^o 
r~o>ooinoOTmas^r~<ncMcnc\jr<i(X]c>oinin<fco^^c\jf~r\i^c\icocoe\i-tf 

r-tOOOi-lCOrHi-IOrHrHrHi-l^rHi-lrHOCOrH.-11-lrHr-IOrHl-lrHrHiHi-HrHMM 

^;?£'<J o ^^ ro ^ o ^<f^rHOrH,-i<x>o<ftnr^cnrHr^<t^(Nir^co(Nj^0c^ 

a '2!? l 2 fv lC lmo 'i Hrtr * r " ocno0v0l0|, "^o^o^Ha)o^^oo^H^^o44lnHNocoHO>0(^HOH(D(^mH^or-o 
t^(^^i•c^<^rilno^r;Ol^\^owocf^OMfnl^<^o(^c^o(^o(^vOOH^■H(^ow^o<|■[f>^o(^lOOt^H^Mool^N(^mt^o[^o 

— '"~— ■'->— ■ — ■■'-.'-» ■ . • 'O'HC0OrHrHrHtHC0rHrHfH^C0rHrHOr^rHrH^OrHi^tHrHrtC0r-Hr-lOr--IOi-HOr-lt--li-lr-{f-IOO'-<O 



i-l i-l I— I CT> I— lOr-lr-tOOi— Ir-lrH 

ui<foo\o>oin l o^ooi00 4HNooo>voiri4ir\0<fH'd-tao<tiA4a"0.tHiAOH 

^NO0>>DHJ)riinHl 1 0riHHON*C0v04>0<fHNNHNHM4'mN^HNOHffiO 



Oino-tOOOOOifl<tN<fO>irnriOHO 

HOHNMnHOvO(0<f!\l<fvDr- < v£> CO f^- O 






win HChvO <f o 
o <h *o in r-< o <o 
o en en o •* o cm 

CO i-H rH O i-H O r-l 



lA(^oo^tN^s)•H(^(^oHooo^oMco^(<1<»^o(^^lno^fWlnri(^H«(^^coHOlnlAc^a3<<loHplo^o(^H 
o•T^OH^o^co•J^mo^^OIlooKlOH^M(»lo^^^OHOoo^o(^oo^c^to(^lnoN^MH4o^■H'0^o<t'l^ 
iDHvOinNC^4-Nin^«)Hco<t>oo^oocN4iri»ooinN4o^^^*iOvi-mNN4vOON4<firi 1 ococD(>m^O'0 

i-l.-Hi-Hr-lrHOrH.~lrHi-IOrHrHiHr-tOrHr-IOrHi-liHOrHrHrHC0rHi-li-lrH 

H■JHr^loNHWrlvo(^<f>oc^( t lOHmoN^<l■HCO^vl^^l^OHlA^^^'£lo-t>o<t^l•^oo^^)-t^OfMcoo^OH4c^H^ 
o^v0^or^rnooooo^cMOOO^oor~rooc^%ovOi-<oco^ocoooo-*coo<i-ooof--»ocoo'--io»oix>!Njoo 

■tO>^(OOPJ<fO>OKlMON{i10 00ISOOIflinOOOiN-t<fO\OivO^OOOilN04IX)OOHOMnOstOM^O-0 
rHQi-I^Oi-li-ICXJOi-IOOrH^OOOO'-IOOrHf-IOrHr-liHMrHrHT-I^H^OO'-lr-IOrHCOOOrHr-lrHOrHCO^-l^-lrHrH 



MH04itiiiioinooH^oinooioinoioooin<toiii>t<fOinH<tHHOriinHow*..o-.vw.. *■-. >_/ ~ . v_- - . 

»0HNOr\|c<14v0HtM^OH^H^v0C0(A^0N i 0rtr^NOW4r>JO4HNONNNi0rM(flc0NNtriHOf0CANW'0O* 



toovOOor~-oor~irirMyDr-(MOoooooc^int^ooot-<r~ hui c^t^oQvOi-<coco<i-fHt-icni^cn^ococ\jc\jcMi-icn^*oa3<rh-c\jvo 

oo^^omH^(04n^^ooNs^lfllflOOrt4^0Hln■*o^^Ori^l■^t■WNt'\(<l'^llnoNlrll f lc^^^ll^l^n(^H^-■(rll^)-o 

(J)HHriHriririrtHHOHrtOHOO»)HHHOHHHOHHHHririHriHHritOHHHHHHrlririrtHHH 

■^2^~™ w ^5 000 ^ ^^ w ^^ rt ^o^o°™™^<forHc*ovo^inrHrncor-iocorHr^ 

ooo(^HM^ocoolnHHMHo<l■<fOfvl(flOI^loOlfl'0^o-oo4(^o<^ln^olBC^^O'Coom<ll(^coooMHOoo«)(^rgvoo 

^inOt>NNO\Oi*lflHOO<t , ONNHONO<|-U10(>N^NOt f lNOH(M^OC>(M3»rvlOOinin4(7iOO>fi 
rMrHOCO^t-(rHOOM>-1rHrHr^COrHrtO.-IMOi-IOC^i-<t-lrH^Ot-IOOO>-IOOrHO'-<i-(OCOi-Hi-Hi-(t-{OCO--l 

oiAinoH t OMxOOHOHiO<i'NoinoHinoo>oo^<i-CMfio<tOHO'nininN>oino\oO'O^Hoiiioo>HHHO»vfiO>ooJ) 

Ort^004M<fv|)H < tHHM v t) 1 OHiDN 1 0>I)OOvJ)N>£IHO<til)00>OH(flN<KU)(<lHOnOOMI<lHvOOOHiONHjTv|[f\ 



Hmi^H^vi-wmHOoiniOh-ooMoiAtM 
CMr\movONM(^H<tHo*<i-^oooHh 

(MflinOHNN^r-NHOvHO NOCOCON4 
O'-l'-'Or-lrHrHr^i-lf-li-HO'-ll-l'-'O'HOl-lrH 

!--0'tf-inH(n<f>ooeooH4<fcin<icoN^ 
crimoo^r-r»-ooooot~-ocoooO'-ivo 

0JrflOOrHOiHO>0OOO<l-OCMOOOCJI^ 

(-li-HOCOrHi-li-IO'HOOOi-HOr-lOOOrHi-l 

oomo<tO'Oif(niHoo*iriooifto-toi 

vOvOCOO-*vOrHrr>rHOfflO<t-rOr-lOcOCOrvlvO 



ro^-oor-OOOcooocOLncnr-irotMvOONmmc^^in 
OCDOOOOh-(NJO-4-OOi-t^-OvOOt<100'-ioom 

iTiinooa\oosoo^oo<t-cMvOoiAr-icoosr-inro<i- 

l-tr-IOO'-IOOOCOr-IO'-lr-HrHCO i-)r-li-l«-<i-<FHr-(rH 

Of-Hoo«Hvooooo^oooi-t>-<a>cofvj 
00oooa»ooc\jcoovir\i-iOvDir\wi-- 

•tOJJMON'JOOM^ONQOi^^CO 

iHOOOOOr-lOrH^Hl-HrHi-ICOi-ll-Hr-ti-l 

oooooooootnt^-oo^vomintfi^ 

>0(ONOl<lrM0^OHi0-tv0'0HHri<tN 



MH03 COO 

o o m r- en 

o <f w win 

O r-l rH r-l f-H 



HOWOHl 

o> oom <f 
in r- o en -4- 



HlOrlvOO 
O O CO CO vO 
O O CO 01 0> 

(DOhho 



inir ciinco 



O rH O CO O 

o co ■* o> o 

O .-H O rH O 



HfflOMllO 

OS (M •£) I*- en 

cm c\j <c in r- 



co m m o r-i 
co h- r- o o 

naif oo 

r-l O O O O 



2222229 00000000 °o c 'Ooooc , ooooooooooooooooooooooooooooooooooo 

2222222 o0o000o0c, °00OOOOO0000OO0O0O00O000O00OOOO0OO0OOO0O0O 

oooooooooooooooooooooooooooooooooooooooooooooooooooooooooo 
»o>o^O!-«»H<NJcom.tfin>o<0!^rom^ooi-ic\<fow^ininvoi^i^co^oo 

■~lrHrHCNJ<NJCVJCMC\JC\IC\JCNJf\l<\JCVJC\IC\l(\Jcncncncncncn<^<n 

HriHHriHHrtriHHHHHririHHHHrirHriHriHriHHHriHHHHrtHririHriHHriri^HriHHHHrlriHriHri 

oooooooooooooooooooooooooooooooooooooooooooooooooooooooooo 
oooooooooooooooooooooooooooooooooooooooooooooooooooooooooo 



93 



I I I I I 

40coh-mHocoi^OHh-HeoN4<t-Ho>tDNM(Mom(\im>oiflOHr-4-oioi><tomvoin*i\i-*o 
o oo>-«rvjvd-oo>jr--o>oooor-cocr>mr-i\or-co<^ootMOi-<(^co ooNONrinmoowr- o •* co o 

r^.i /-*i m _•+■ ir» **- irv !■•». *n f~\ •+- .-*■ j~*» !■— rK /T\ r»— m ir* .-*- in r*\ /-* /~\ .-*■ »-\ /-\ nri m *~*\ c*^ *r» i>-~ n\ rr* rt\ m y^ /-** r*_ rjv rk .« rs-> ,~v 



coo^^fH(^«^o(D^-mr^o(D^OH^H(xl^l■*^rHc^tDN^o(^lomNt<lOl<lOH^-•^t•o^o(^<l•owvOln4'N<^o 
ih * o-J-Hffi oo>-«rvjvd-oo>jr--o>oooor-cocr>mr-i\or-co<^ootMOi-<(^co ooNONrinmoowr- o •* co o 
como^ntoNOI»■l■tfl^-ln^lOo<t••to^(^(^^cOln<^tn(^oo<fooccl!Doo^B^o^(^(^^oo(^^■(^(^^offlo 

IriHOHHrlfflHHHHOHrlOHrlttlHHHHHHHriOfflOSHJJriHHtOCOrlHHrtOrKOHHHHHHa) 



HHHOhHnNf^NNNO^mOONNNlflinNO^inOO-ttaCOifiNIflrtOHst-O^NODNvOOaiNCOJ-Nin 

^ooooovoo<fOvOoooorHOir\»oo^r^^O'^^rvicno<>ovovOc\iMif\<foi^-i-HCNjinco-d-(>o>oooot-i-i- 
c^ooo^o>o*or-^oooooooc^^o<f^^^^o^^o<i-r--incoLnooty>a3(>(>MDvo^-oooooo>oooocNj<> 

H»«IOO>H(Or<HH(OISOOHOriHfflrirtHHHriHHOHriHHririHriHHrlriHOHHOri(OOOHrt 

•*inHOHtfio>HOMnoinooovOinin»ocMniniftirnoo>ooinHHinii\<i , OHNO'^ininoor(HNioomo>H 

N>OriOMvOiOO>0*0'flHOmvOHvf'OHiOHH4J'HN^OHOHH4N^OM>OrgiOOOHOO^HOt<liflO 

I I III I 

OHl^(^NH>o^oc^m(Olr^N^(0(^HOlns^ln^otn^locf|^oo^^fow(^l(lONO»^a^otOHO^H^•o>0(0 
oooNOJtfflN^vOHinraMiriiDrviHNtoN^ONr-oHovoflor-HmNOvOinvONONoowin^vOfi^o 
0'Olfllnoco^o^-m^ONoo^(^(^^n(o(^'0'0(^^o^^voocoHO(»(D•s^(»^■^(^^OlOco(^o^a)0'0^(^o^lOHO 

(BHHHC0riHHrlHHHHOOHHOHrlOH03HrlOHHII)riHririHHdfflrtHH(l)riHroHriHHHH(I) 

ooO'ON^tflNooHOr^^oc^^o^oot(l<|•o■tc»oo^^o(MNo<l•o4(^'-'l»^o>o^OH(M<^^ONl(l*^^t■Nl«^<|•<|■ 
ooooo»(Oto>ooHHinm(oioooHOi > -Ho4<)-oooi> r---cr> cooHNon»4coooNO\o>(MV()oomioost 

OOOO0M00>CM»<fHO(»OOff><tOhOO'tf»<fOOff'C0MnOi0( | lOMMI)NOO!t)iAiCt0 0>OO<l-^O^ 

OOOOQrHi^rHOr^O'H'^OO«Hr^OiMcHO'^^^C0OO»^MrHOrtrHC0iH<^f-Hr-IO00l-li-4lHl-(r-<rHOi-Hi-(OfH 

OHinmiAinMio^^H^4ooooO'Oo>oo>riHifioinoH4HinoHooH<fifnoHoinHOiininino>OH 

00«rtHHNH>0>OOC0400tMHOO>HOvl)OrlHOHNOMOJ)HH[MHO<tI<lrtONvOOiO'0(niOiOmo 

I I 

c^^ro^i^inovOrsiooco(^ojr-o\Orrir--Or-HLn^o«£ic\i^<tcvjc\iroOi 



•tf fTl O 

H0>0 

m vt> o 



r-i t~- ro 
vO o 0> 

i-H O rH 



■3" r\i <£> in 

r- r-< o o 

*o 00 o ^o 

i-( i-H O <-< 

cm o m i-« 

r-i in o in 

NNriO> 



I till II I 

N(>m<frtinO*NNC00>Nh0>Otr|(^OHinv0ON*-3-NN! f lOHOOO!<imO4-<l'mm^NOOh-ini>t0lOO(D 

o(^HH>0(<lIomMOO(<l(<\^^to^Olllo»•J■( f lHrim^HlfloOlfto<t'OH(fl0^^^^o^^c^ooOHMl0 4 0(^ 
lBHw^o^^Da)^n^oo^lrllrl^-^oco^•c^lOlrl0^^^^lnl^l^oR)ooflomo^lc^oco()^t^^No^oo^o<^^<t^o(^ 

HHrlriHHHHHCOHHHHrtfflHHOHHriHrlHHrtHiDCOHtOHODHHtOHHririHHfflCOHHriHHODri 



st -d- m <j- 
~-ww~.....~-» _ ~- c- o m 
OOOvOOt— 4 h oo> CM 01 ^ci 



^vOOO*0^m*»tnc0 0^4ffl(0 4 000fflOi^Hm4tOO>00 44Niri4NO<tH4<l-Hr\IONiriNW(>0 0»OH 

<to>-ooomMBHOHocoHf>CMnoo(^<tm40ooooooi^HMMi<iirijTjicooioo^ooootoo><fo>ooifiiri 
ll^Hmolrl^llnc^4^coovOtowvOmln(BvO^J^-^ot^c^offloo^Ho^(^o^(n(^lrl[Ovooo^O!0(^ooot^40 0>oo(^(^ 

o<t(>H^ointMAiri4oif\^vOHH<fo^vOO>DONOO>ooorti!iHf>HOiO'H(OiniAin(?OHriifirHinrirj\HOinooi> 

HI\l^0OHriH^0^0H^^l((\(^^0HOH^I(M^|■HN4■■^)(M^0I^JOOOHOHO>0'^)OC^<)'lflm^0mOO>0OtflN^0O^^0O>0'0 

II I I I I I I I 

*4owvO»OH^ooNKor\iH(>coKOHi^inHirio^i v h-o^-c«iooNN*a)ifioNNooN 1 oo( r iHC()o3Hino(o<)^>oi i - 
(^rioo^Mlfl<^OlnHlna5(^^lnHM^^JMoo^orA>OHO^llHOOo^HM(^0'OOOoo( r lOO^ , lH^(^l^oo^^^(^H 
Hl»ooN^(oooc^^o44^Nffl4^oco^(Olno^i^(0'^)C^^JO'OoO ( 'fl(^^t'0^ooooc^04NfflN(^(>o<)<i•^c^o^ 

HHC003HriHH(I)HHHHHHHHHHHriH(»HHrlHrlHt<)H(DHHOHII)HIDC00D00H00HHi-lriHOt0HriHOri 

co^ooH^^co^^•JlAr-llrl^owo(DONOffl(' > •tcc)o■OH^(^c^H^DN^oo(^■tOH^o^^ooo(^ln^^l^(^o<^l^lOOC^o 

0>0N>0NO0iOM^40>>0NO^O*OiflO>0Nhff>O0i0[)C0hl^0><i-^^ONl»OinC0C0*f>00aHrgii\OO0^^OO0\O 

HOHON-)'OKiH4irio<fo^^Niii>OH^r>riOHO(MnoiHa>infooinriiniAHHiiimHO>OHOOOHO>riiflOMii 

NMOH(MNOHO-tH(MHri>fll'lN(llHOvOvl)ONHHiflO<0 0>CH4MOHO( < lHOOHNO>OHONOOO<OHmiOm 

I II III 

HOlAHlr\^t•HOOH<fcoM['l^o^ft(^>oc^H(<lo^04•l■^coH^|■o^^K^r^^Ht^OlnHo^>or^lo^!^Ho^^o^ooHoo 
cno^DOH^04t^^'OrtH^oNH(Aoc^J(\(nHO(^^o^NWlOo^o^oo•tow^f(^rt^l4((l^ooN^^lf>^o(^r^lor^J44o 

40400>^NvOWfflNNiTi^fflh^4roOWOH40W<f^O*09'OOOCI 1 05>f~ofl>OvOvO<|-0>OCOifilOOO'HmocO[)><fO 

HOOHOOHHHHHHHHOriririHHririCOHHOHHOHCOHHflJHIIIHHHHHHrioairlHriOHHHBJHHHffl 

H(X)^^^4Hmlr\^coHN^oHO*^HN4tO(^cooN^ooH4NHmNc^lC^c^Ho^-^J(AoNHowo•4'ON[Dofflt r l^o 
^Ol)^o[OH^t)o^|^lnIfl^oln(^^o[^lOHo^m^ < l^^^o^■^(^^ot^r^r^oo«)(^oo^OH(^ll5o(^l^oooo(o^-■J^oco(^ 
(^lno^oo(^Oln•t^w(^(^o(^^l^(lJ)Olft^^•c<)'0 0(Il(^lOC^^M(^oOMOOOln^O(^(^0(D(^o[)00 0(^co(^^o(^(^ 

inHooin(Mftinoo>'JiAiftoit>o^'Jo^oiH4HOininoMHO>r\iHinoooiniriOiiiioiOHOoooifloiflHoo^H 

HO( f iNHvO'OrlN>£)NvOHOHH>OHt<liOiOOMH6>0(J'OCMO>CNHmHOOiO-Ji£IHi£IOO l O'0'-IOnMriO(M^NO 

I III 

o>o m ow ^l^^ l low^mo>o oo4^■NO( ^ lfMO(^om^womcDHlnm^O'0(tlco^^c4<^(^0(<lN4^otoOlOoNfflo 
^l'lAoolAW^<l•-tlnHNK)^oco^^^lNrtHOlA^^otf|^ooo(^o^owH|fl^om^O'ilH^o^Jlfl(^o^oO'0^wO'0^-^^oo 
ocoo4^^^(»c^(^J)^^u^^oomHOO^a3^ooraN^DC^tDo3^^ln>C(X)C^(^(^c^lH[^l<l•(^(^h•oc^o•t(^c^o^c^lAo^o 

OOO4^^HNmOOriH^HfflOC0ON^0HO4<|■4C0mN^OmO'4■HC0(^'fl(^llll^0NHC04C0r^l^ri^^BOH^()^0^11A 

mtnti^(oNHOooooMii)ooooNH^*40HH(»in((iooHO>oiioi»0'in>o>oriH)coO'f>o>o>oinii)<fj)HriOit> 
(^laJ^^JO^^r^lOOOoolr\<>o040^4(^w^(o^ooo^<f(^oc^lno(^oolA^oct)^lN^(^lrllXlO(^(^l^a3(^t^44<)■(^ 

oiftoo*J'0>ooHif\o(MnoOHoc r i(Miiif\riJ3in(>intM'iHi0^o^oooo>o>oj'00nH^inHo-ti-iO'Jifli'iH 

HHHNNH^ ( rioornmiOvOOOH>oO<vOH^o H * v O'J) i ONOi-l4cnHOON^N<l'Nr>a'HOHriN040NN>D'00 

I I I I I I 

wo^o>off^tv040(^^-^N^oa)4Hl^N05NO^lAo^NmNlnmo^^^l(^lH^oN^-cA^ocool^lvOrtK)HC^(^o(^l^cooo 
oo^HH^^(^<^OHffl[•-woooo>ON^^l^•^04^0Nl»lO»lf^lflOmrlow<^<t■oo4lI^r^l(flON^H^offl^■(oo^o^(^lOO 
oot , l^o4lfl^H(^o(^)l»^o^-^oo(^^o^^O(^(^•t(^WNo^-t^(^ow^I)o^Ol^oDoot^^(^(oo^>oc^c^l^l^lo^ocoto^ooo 

OOlDHHHOrlrlOOHHHHHIDHHHriHOHHHHOHOOIOHrltOHOHflOfflHriHHffl.riHriHriHHOHriHflOH 

N<)W040^40004i r iO^O<t'HNiO[ON^\OJ)(DNO*[flO*OiOrv|HO'tlDffl^HH(10 0HriOiOr(lft!0>OHn44 
M?HOt0OO00(DtI)Ol)3OOO^OHHOOC00iHOHO^r>OfflKlO^mO<f4OHOi0(tl^Ov0OOO(0!D.JON(0^O 

c>inoooc>o^c^ooo^ooovOo<f-d-oooin<hoinorHf^o^r^o^r^oinrov0^oc>r-ooo^o-*oi^^^o^(>c>o 

rtiMi^O^O^'HOOOrHOOO'^Ot^^COCOO^rHOrHO^rHOr^rfOOi^O^^^rHeOt^r^rHCOt^Of^O'^rHfMOiH^ 

Hri<tH(<iooNOOoiriHOHHiftin^oif>ooi.toO'OHiftooc iH ifi'*ooiriinmifio4HHOHijiinoiO'Hoin^HO 

f-ONONOHNOOM^Ol<100«\'il'HJ) 1 00'ON(f|HOO>vOONHOH40vDOHOHM40HMO>0(<lvO>l)onO>000 



- - - - - - - - - 0000000000000000000000000000 

oooooooooooooof->oc-)00oo(~if-)oriooo 



r-i^r^r-r--r--r-r--i^-r-r-r-r-r-r-r-r~r~r-r~r^-r--r--r--r-r~-r-r-r~ 

OOOOOOOOOOOOOOOOOQOOOOOOOOOOOOQOOOOOOt^i_>>wji_.i_Jwi_;v_;ui_'<w>i_>wv_j<w»>*_>i_J<->uvj 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO'"^'*''"-'-''^'-^'--'^'-^'-'' - '^'-^'^'--'^'-^'--'^'- 



OOOOOOOOOOOOOOOOOOC 



(^<OlflO^■4Hml(^N(^vO<flO^<l•HODlnN^^^omo^4Ho^lnN(^^omo^4'HcolnN<^^omo^^t'HOOlnN(^^0(no^■4•o 

co^OrHtHr^^c^^inu^vor^ooco^oo^cNjcvi^^tninvO^i^coc^c^Of^cvicvjt^^^invO^r-coc^ 

ininvO%Os0^vOvO<)vO<)v0^vOvo^r~t^f^^i^^^^(^^i^f~^i^r^coooo3ooa50ococoaDoo<oro 

<-tr^t-fr^r-lr-<T-lr-tr-ir-lt^T-tr-1r^r-t'-it-ir-i<-tt-ii-li-<>-ir-ir-<r-{r-i r-Ur-l t-lt-lr-lf-<iHr-lr-lt-li-«i-lr-(iHrHi-li-li-lr-lr-)r-lrHr-li-li-<i-li-4f-li-IO 

OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 



94 



-4% W <£M 



INTERNATIONAL BUSINESS M AC H I N ES CO R PQ R AT I O N , 590 MADISON/VE^, N EW YORK 22 J^EVjMTORK 



